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ABSTRACT 


SUTTON, KENNETH. Characteristics of Coupled Nongray Radiating Gas Flows 
with Ablation Product Effects about Blunt Bodies during Planetary En- 
tries. (Under the direction of FREDERICK OTTO SMETANA). 

A computational method is developed for the fully-coupled solution 
of nongray, radiating gas flows with ablation product effects about 
blunt bodies during planetary entries. The treatment of radiation ac- 
counts for molecular band, continuum, and atomic line transitions with 
a detailed frequency dependence of the absorption coefficient. The 
ablation of the entry body is solved as part of the solution for a 
steady-state ablation process. 

Application of the developed method is shown by results at typical 
conditions for unmanned, scientific probes during entry to Venus. The 
radiative heating rates along the downstream region of the body can, 
under certain conditions, exceed the stagnation point value. The ra- 
diative heating to the body is attenuated in the boundary layer at the 
downstream region of the body as well as at the stagnation point of the 
body . 

Results from a study of the radiating, inviscid flow about spheri- 

i 

cally-capped, conical bodies during planetary entries are presented 
and show that the nondimensional, radiative heating distributions are 
nonsimilar with entry conditions. Therefore, extreme caution should be 
exercised in attempting to extrapolate results from known distributions 
to other entry conditions for which solutions have not yet been obtained. 
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INTRODUCTION 


One of the major scientific endeavors of the present day is the 
exploration of the planets by unmanned and manned spacecraft. The 
present technique for planetary entry is to use atmospheric friction as 
a brake to slow the spacecraft from hypersonic speeds. During hyper- 
sonic entry the gas around the body in the formed shock layer is heated 
by the dissipated kinetic energy. In order for the spacecraft to sur- 
vive, the main body of the spacecraft will be protected from this source 
of intense heat by the use of an ablative heat shield material. The 
speeds required for planetary entries will be well in the excess of the 
parabolic speed in order to reduce trip times for interplanetary travel. 
The temperatures of the heated gas behind a shock wave associated with 
these high-speed entries are sufficient for gas radiation to be a major 
contributor to the heating of the spacecraft. The inclusion of radia- 
tive heating in the energy equation of flow field solutions causes a 
strong coupling between the radiative transport, the inviscid shock 
layer, the boundary layer, and the ablative heat shield analyses. Com- 
putational methods for the solution of this complex flow phenomena are 
required before heat shields can be designed to survive during planetary 
entries at speeds in excess of parabolic speed. 

At entry speeds less than parabolic speed the radiative heating is 
negligible and convection through the boundary layer is the dominant 
mode of heat transport to the body. The neglect of radiative transport 
uncouples the inviscid flow equations and the boundary layer equations; 
however, the boundary layer analysis and the heat shield analysis are 
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still coupled. Extensive analyses for boundary layers with mass injec- 
tion have been conducted over the years so that the necessary inputs 
to the heat shield analysis for convective heating and mass diffusion 
can be determined without a coupled solution of the equations. 

At entry speeds in excess of parabolic speed the radiative trans- 
port cannot be neglected and the radiative heating can be much more 
dominant than convective heating. In general, the radiative transport 
in a gas is governed by integral equations involving the absorption 
coefficient integrated over both radiation frequency spectrum and 
thre e-dimens ipnal space. The absorption coefficient is dependent on 
the temperature, density, and the number density of the species present 
in the gas (ref. 1, page 721). Thus, the radiative transport is depen- 
dent on the thermodynamic profiles throughout the gas layer between the 
shock wave and body. The absorption of radiation by the cooler gas in 
the boundary layer will change the thermodynamic profiles in the bound- 
ary layer and affect the convective heating and mass diffusion to the 
heat shield. In early studies, the incident radiation to the spacecraft 
was taken as the radiation from the inviscid shock layer. Later studies 
have shown that the boundary layer, with and without injection of abla- 
tion products, can absorb radiation and reduce the incident radiative 
heating to the spacecraft. For high-speed planetary entry, the solution 
of the flow field equations and the heat shield analysis is very complex 
because of the coupling of radiative transport. 

The radiative transport to the stagnation region of blunt bodies 
for entries into air has been the primary interest for most studies of 
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radiating flow fields with ablation product effects. The interest for 
entries into air was due to Earth reentry after exploration of the 
Earth's moon and preliminary studies for Earth reentry after exploration 
of Mars. There is a need for investigation of the radiating flow field 
in other gaseous atmospheres because of the increased interest in explor- 
ation of other planets (Venus, Jupiter, etc . ) ♦ The emphasis on the 
stagnation region was due to a simplification of the solution and be- 
cause the radiative heating was considered to be greatest in this region. 
However, the recent results by Olstad (ref. 2) and by Callis (ref. 3) for 
an inviscid, radiating flow field have shown that the radiative heating 
to the flank regions of blunted-conical bodies can equal or exceed the 
radiative heating to the stagnation region. As discussed by Page (ref. 

4) , most of the heat shield surface and weight is downstream of the 
stagnation region and valid treatment of fully-coupled solutions is 
needed downstream of the stagnation region along cone flanks or over 
spherical noses. Anderson (ref. 5) states the need for additional so- 
lutions of the coupled radiative problem with ablation product effects 
to complement the existing results. These points illustrate the need 
for a method of calculating the fully-coupled radiating flow field, with 
ablation product effects, around the entire body and for entries into 
atmospheres of arbitrary gases. 

The purpose of the present study is to investigate and develop a 
computational method for a fully-coupled solution of the radiating flow 
field, with ablation products injection, about blunt bodies for entries 
into arbitrary gas mixtures. Basically, the method is to separate the 
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radiating flow field into an outer inviscid layer and an inner "boundary 
layer with injected ablation products; then, the two solutions are 
coupled by the radiative transport through both layers and by the 
boundary layer displacement thickness for mass injection. The radiative 
flux is included in the energy equation of both the inviscid solution 
and the boundary layer solution. As previously stated, the fully- 
coupled formulation for radiating planetary entry is very complex and 
all approaches require varying degrees of approximation in order to 
obtain a solution. By separating the two different layers of flow, a 
better treatment should be possible for the solution of each layer. 

A second-order, time- asymptotic technique is used for the solution 
of the inviscid shock layer. The set of unsteady governing equations is 
hyperbolic, thus the technique is valid in both the subsonic and super- 
sonic regions of the inviscid flow about the body, A computer program 
for a numerical solution of the technique is developed in the study. 

An equilibrium thermodynamic subroutine and a detailed radiative trans- 
port subroutine are included in the computer program so that arbitrary 
gas mixtures can be considered. Moretti and Abbett (ref. 6) used a 
time-asymptotic technique for an inviscid flow solution without radia- 
tion in a perfect gas and Callis (refs. 3 and 7) used a time-asymptotic 
technique for a radiating, inviscid flow solution in air. 

The solution of the inner gas layer is for a nonsimilar, multi- 
component boundary layer with mass injection, unequal diffusion coef- 
ficients, and arbitrary chemical species. The numerical, integral 
matrix method of Barlett and Kendall (ref. 8) is used for the boundary 
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layer solution and there is an existing computer program called BLIMP. 

In the computer program, the thermodynamic properties and transport 
properties (viscosity, etc.) are calculated as part of the solution. 

The injection rate of ablation products can be either prespecified or 
calculated during the solution for a steady-state ablation process. 

The computer program is modified in the present study to account for 
radiative transport within the boundary layer. 

The radiative transport solution for coupling the inviscid layer 
and the boundary layer is for a nongray gas with molecular band, contin- 
uum, and atomic line transitions. The integration over the radiation 
spectrum uses a detailed frequency dependence of the absorption coef- 
ficients and the tangent slab approximation is used for integration over 
physical space. An existing computer program (RAD/EQUIL) of the numeri- 
cal method by Micolet (ref. 9) is used for the solution of the radiative 
transport. In addition to using this program for coupling the flow 
fields, an extensive modification of the program is made so that it can 
be used efficiently as a subroutine in the developed computer program 
for the inviscid radiating layer. 

The application of the present developed method is shown by a 
study of typical points on an entry trajectory for Venus. To the 
author's knowledge, there are no published results for a fully-coupled 
radiating solution with ablation products injection at either the stag- 
nation or downstream regions on a body for Venusian entry. The validity 
of the method is investigated by a comparison with published results for 


Earth entry. 
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REVIEW OF LITERATURE 

The review of literature is restricted to prior studies which 
present the more pertinent results for the radiating flow about blunt 
bodies with ablation products injection. The fully-coupled solution of 
radiating flow with ablation analysis is a complex problem and involves 
many disciplines; therefore, a detailed review of the entire field for 
the thermal analysis during planetary entry is not presented. A good 
review and extensive reference list for radiating shock layers is given 
by Anderson (ref. 5). Similarly, a review of ablative heat shields for 
planetary entries is given by Walberg and Sullivan (ref. 10). These two 
articles provide a good review of the present technology of radiative 
heating and ablation analysis for high-speed planetary entry. For 
additional discussions of the background information presented in the 
Introduction on planetary gas dynamics and planetary entry, the reader 
is referred to references U and 11 to 15- Information on trajectory 
analysis for planetary missions is available in reference 16. A dis- 
cussion on types of heat shield materials and ablation mechanisms is 
given in reference 17. A good analysis on the coupling between the 
boundary layer and a charring ablator is given by Kendall at al . , (ref. 
18) . 

The remaining sections of the literature survey present more 
detailed information which is pertinent to an analysis of the radiating 
flow about blunt bodies. The first section discusses features of radi- 
ation transport modeling. The second section is a discussion on radia- 
ting flow field analyses . In addition to flows about blunt bodies, a 



discussion is presented on significant and applicable results from 
stagnation region analyses. Finally, a section is presented on the 
thermal analyses for Venusian entry. 

Radiation Transport Modeling 

An atom or molecule in a high-temperature gaseous medium can emit 
and absorb radiation at a frequency characteristic of some transition 
from one quantum state to another and each specie has an absorption 
spectrum which can be expressed in terms of an absorption coefficient. 
Because of quantum transtions, the absorption coefficient is a function 
of frequency. Radiation of a given frequency travels in physical space 
a distance (radiation mean free path) before being absorbed. (The above 
description is from reference 1, page 721.) Thus, the radiative trans- 
port in a gaseous medium is a function of frequency and distance and the 
equation for the total radiative transport is an integral over both 
frequency spectrum and physical space. 

The solution for a radiating flow field is a set of integro- 
differential equations and approximations are used to solve this complex 
system of equations. One of the approximations deals with the spatial 
aspect of radiative transport. The absorption of radiation at a point 
in the flow field is a function of the emitted radiation from surrounding 
fluid elements; and, since radiation travels a distance before being ab- 
sorbed, the radiative transport is a three-dimensional problem in space. 

To reduce the complexity of the solution, the "tangent slab approximation" 
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is usually used for radiating flow fields. This approximation treats 
the gas layer as a one-dimensional slab in calculation of the radiative 
transport. The radiative heat flux is neglected except in the direction 
normal to either the body or shock wave. 

Garrett (ref. 19), after a review of the studies of references 20 
to 22, states the error introduced by the approximation should be less 
than 5 percent at the stagnation point. Page (ref. 4), in a discussion 
of the three-dimensional effects, concludes that the tangent slab 
approximation is sufficiently accurate for engineering calculations when 
the shock-layer thickness is small compared to the curvature (~1/12). 
Page's conclusions are based primarily on the studies by Chien (ref. 23) 
and by Wilson (ref. 24). The study by Wilson was a comparison of the 
tangent slab approximation with an exact three-dimensional numerical 
calculation at the stagnation and downstream regions of a blunted, 
conical body for a typical Earth reentry. The error for the tangent 
slab approximation was 15 percent at the stagnation region and less 
error at the conical region. The tangent slab approximation is used in 
the present study. 

In radiation transport modeling, the gas may be treated as trans- 
parent, gray, or nongray. A transparent gas is assumed to emit radia- 
tion but not absorb radiation. The treatment of a gray or nongray gas 
allows both emission and absorption. However, the absorption coefficient 
is assumed constant over the frequency spectrum for a gray gas. A fre- 
quency dependence of the absorption coefficient, either approximate or 
in detail, is included for a nongray gas. Anderson (ref. 5) traces the 
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historical development of radiating flow fields and shows the progression 
from transparent, continuum only, uncoupled calculations used by early 
investigators to the nongray, continuum and line, coupled energy calcu- 
lations which are current today. As discussed by Anderson, a gray gas 
analysis is not sufficiently accurate for reentry applications and the 
gas should be treated as nongray. 

The frequency dependence of absorption coefficient for a nongray 
gas is treated in detail or by a "step-model". In a step model, the 
frequency dependence is broken into a number of discrete steps (see, for 
example, references 7 and 25 to 27). The number of steps are generally 
from two to nine. The calculation of the radiative heat flux involves 
an integral over frequency and using a step-model will simplify the 
integration. However, the injection of ablation products into the flow 
field increases the number of species to be considered and there is a 
rapid change in chemical composition in the boundary layer. A step- 
model has to be constructed for the particular gas composition and the 
addition of ablation products will complicate the construction. Boughner 
(ref. 25) had difficulty in developing a general step-model for a 
COg-Ng mixture; and, the developed step-model was only valid over a 
restricted and narrow range of conditions. The difficulty was due to 
molecular band radiation. 

The radiative heat flux with ablation product effects has been 
calculated for a nongray gas and the frequency dependence of absorption 
coefficient was considered in detail (see, for example, references 19, 

28, and 29) • There are computer programs for calculating the detailed. 
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nongray radiative transport of which the ones used primarily for reentry 
application are RATRAP, developed by Wilson (ref. 30); SPECS, developed 
by Thomas (ref. 31); and RAD/EQUIL, developed by Nicolet (refs. 9 and 
32). Suttles (ref. 33) made a comparison of these programs in a recent 
study and concluded that the RAD/EQUIL program depended on fewer approx- 
imations, included more detail, and required less computer time than 
RATRAP and SPECS. The RAD/EQUIL program is used in the present study. 

As discussed by Penner and Olfe (ref. 13), radiation is coupled to 
the conservation equations by the radiation pressure, radiation energy 
density, and radiation energy transfer. The radiation pressure and 
radiation energy density are usually negligible and can be neglected even 
when the radiation energy transfer is very important. The two terms can 
be and are neglected in solutions which deal primarily with radiative heat- 
ing (refs. 13 and 34). Therefore, the coupling between radiation and the 
conservation equations is due to the divergence of the radiative heat 
flux in the energy equation. 

For additional information on radiation and radiative transport , 
the interested reader is referred to the numerous available books . Two 
good books with which the author is most familiar are by Penner (ref. 35) 
and by Penner and Olfe (ref. 13). Radiative heating is considered in 
the book on gas dynamics by Vincenti and Kruger (ref. 34). Also, ref- 
erences 36 to 38 present analyses of radiative transport for high- 
temperature gases. 
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Radiating Flow Fields 

The interest of the present study is the radiating flow field about 
blunt bodies; therefore, the flow in both the stagnation region and the 
downstream region has to be considered. Also, the prior studies which 
included ablation product effects have been for the stagnation region. 

A discussion and literature survey are presented first on the pertinent 
results from analyses of stagnation-region flow; then a discussion and 
literature survey are presented for flow about blunt bodies. 

Flow at Stagnation Region 

The recent doctoral thesis by Garrett (ref. 19) presents a detailed 
review of the various methods used for solving the radiating flow field 
at the stagnation region. Also, the various methods of solution are 
discussed in the papers by Goulard et_ al (ref. 39) and by Anderson (ref. 
5) . The reader is referred to these papers for a description of the 
solutions. Only the pertinent results will be presented here. 

The earlier studies by Howe and Viegas (ref. 1*0) and by Hoshizaki 
and Wilson (refs. 1*1 and 1*2) have shown there is a coupling between 
radiative and convective heating and that radiation from the higher- 
temperature inviscid region can be absorbed by the lower-temperature 
viscous region. Later studies have shown that the ablation products 
injected into the flow field from ablative heat shields can significant- 
ly reduce the radiative heating to the body (refs. 19 , 22, 28, 29 , 1*3, 
and 1*1*). These studies were for Earth reentry except a limited part 
of the study by Wilson (ref. 1*1*) was for Jovian entry. Hoshizaki and 
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Lasher (ref. 22) state that atomic carbon from the ablation products is 
the principle absorber and Smith et al . (ref. 28) show that carbon monox- 
ide can also significantly absorb the radiation from the radiating shock 
layer . 

The recent thesis by Garrett (ref. 19) presents a comparison of the 
results at the stagnation region for air injection and ablation product 
injection. Garrett uses an implicit finite difference method for a 
solution at the stagnation-point of a blunt body and treats the entire 
shock layer as viscous. The results of Garrett show that massive in- 
jection of ablation products from a carbon phenolic heat shield into air 
reduced the radiative heating to the body by 1+0 percent ; but , massive 
injection of air only reduced the radiative heating by 15 percent. A 
comparison of results presented by Garrett for solutions from various 
studies showed that ablation products reduce the radiative heating; but, 
there were significant differences in the magnitude of the reduction. 

Smith et_ al . (ref, 28) used a method for the stagnation region which 
is similar to the method in the present study. That is, separating the 
inviscid layer and the boundary layer and then coupling the two by the 
radiative transport. The study was for Earth reentry with ablation 
product effects. The derivation of the boundary layer equations included 
the radiative heat flux in the energy equation and was for moderate and 
strong blowing. However, the results presented did not include the 
radiative heat flux in the energy equation for the boundary layer and 
was only for strong blowing. The solution of the equations was by 
jnumerical methods and Dr. Smith has stated there are difficulties in 
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extending the solution to include radiative heat flux in the boundary- 
layer energy equation and to include moderate blowing. The problem has 
not been solved.* The study by Smith et al. did show that the basic 
method is valid and in the present study the treatment of the boundary- 
layer solution is much better than the approximate method used by Smith 
et al . 

Hoshizaki and Lasher (ref. 22) treated the entire shock layer as 
viscous and stated the advantage is that it eliminates the necessity of 
matching the radiative heat flux at the inviscid-viscid interface. 

Garrett (ref. 19 ) treated the entire layer as viscous and there were 
irregularities in the enthalpy profiles at the inviscid-viscid interface 
for strong blowing. The enthalpy profiles come from the energy equation 
and this equation is where the radiative transport is coupled to the flow 
equations. In the present study, the coupling is not a direct matching 
of the radiative heat flux at the interface. The radiative heat flux to 
be coupled in the energy equation of the boundary layer is taken from the 
solution of the radiative transport over the entire shock layer. The 
magnitude of the radiative heat flux from the boundary layer toward the 
inviscid layer is small compared to the flux toward the boundary layer 
from the inviscid layer (see, for example, ref. 28). Thus, in the pre- 
sent method the solution for the radiating inviscid layer is solved once 
and an iteration is only required between the boundary layer solution and 
radiative transport solution. 

•Personal communication with Dr. G. Louis Smith, Langley Research 
Center, Hampton, Virginia 



Garrett (ref. 19) and. Rigdon et^ al . (ref. 29) state the need for 
properly calculating the thermodynamic properties of the ablation pro- 
ducts. In the present study, the thermodynamic properties are calculated 
during the solution for both the inviscid region and the boundary layer 
and arbitrary gases can be considered. 

As illustrated by the comparisons presented by Garrett (ref. 19), 
there are discrepancies for the magnitude of radiative heating reduction 
due to ablation effects even for the stagnation region. The existing 
results are primarily for Earth reentry and calculations need to be 
performed for other planetary entries. Anderson (ref. 5) states that 
realistic calculations for radiative heating to entry vehicles should 
definitely account for ablation effects and additional radiative coupled 
analyses with ablation effects should be made in order to complement the 
existing results. 

Flow about Blunt Bodies 

There have been a number of studies and numerical solutions for the 
radiative heating with ablation effects at the blunt-body stagnation 
region but solutions for the downstream regions of the flow field are 
not so advanced. The few studies which have considered the radiating 
flow about blunt bodies have shown that radiative heating at the flank 
regions of hemisphere-conical bodies can be a large fraction and even 
exceed the radiative heating at the stagnation point (refs. 2, 3, 45 » 
and 46). These studies were for Earth reentry, used a step-model for the 
radiative transport, and did not include ablation product effects. 
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The study by Olstad (ref. 2) was for an inviscid shock layer with 
the solution of the. flow field by the method developed by Maslen (ref. 

47) but modified for radiative transport. The method of Maslen is based 
on the flow being parallel to the shock wave and uses a von Mises trans- 
formation. This method uncouples the y-momentum equation. However, the 
method is not strictly valid at the stagnation region. The study by 
Olstad was for the Earth reentry of blunted-conical bodies with cone 
half angles of 30, 45, and 60 degrees. A step-model was used for the 
radiative transport. The results showned that the radiative heating 
along the cone flanks was comparable to the stagnation region values for 
the larger cone angles. Olstad also presented some preliminary results 
for air injection into the shock layer. These solutions were performed 
by using the Maslen method for an inner inviscid layer. The results 
showed that the air injection was more effective in reducing the radia- 
tive heating at the stagnation region than at the downstream region. The 
enthalpy profiles of the inner inviscid layer give the appearance of a 
boundary layer but are a result of absorption of the radiant energy emit- 
ted by the outer inviscid layer. 

Callis (ref. 3) investigated the radiating, inviscid flow about long 
blunt bodies by using a time- asymptotic technique. A discussion of this 
technique is given below. The study by Callis was for Earth reentry and 
a step-model was used for the radiative transport. The body shapes were 
spherically capped cones. The results showed that for larger cone angles 
(60 degrees half angle) the inviscid radiative heating rates were in ex- 
cess of the stagnation values over a large portion of the flank region. 



Callis states that this increase in heating rates along the cone flanks 
could pose a serious thermal protection problem. 

Chou (ref. 46) presents an approximate method for the flow about 
blunt bodies in which the entire layer is considered to be viscous. The 
solution is based on an approximate method for nonsimilar terms, the 
specie continuity equation is neglected, the density-viscosity product 
is constant, and the wall conditions are for constant mass injection and 
temperature along the body. An equation is developed for the nonsimilar- 
ity of the tangential velocity and Chou states that the validity of the 
equation cannot be defined rigorously and the physcial reason for the 
successful application is not clear. The application of the method was 
for Earth reentry and the injected gas was air. However, radiative 
transport was not considered for the air injection cases. A comparison 
was made with the method of Olstad (ref. 2) for inviscid radiating flow. 
The check cases were supplied by Dr. Olstad and Chou states that his 
method is valid when the results are compared. However, there is some 
question about the manner in which the results are being compared and 
the comparison may not be as good as shown by Chou. The disagreement 
over the comparison of the results has not been resblved.* 

Prior solutions for the radiating flow about blunt bodies did not 
include ablation product effects and were for Earth reentry. The need 
for a fully-coupled solution with ablation products for arbitrary gases 
can be illustrated by the studies of Tauber (refs. 48 and 49) and Tauber 

♦Personal communications with Dr, W. B. Olstad, Langley Research 
Center, Hampton, Virginia 
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and Wakefield (ref. 50)- These studies were for planetary entry into 
Jupiter, Saturn, Uranus, and Neptune with a nominal atmospheric composi- 
tion of 85 percent hydrogen and 15 percent helium (mole fraction). The 
basis for the thermal analysis is presented in the paper by Tauber and 
Wakefield. These studies had to rely on stagnation-point results for 
the thermal analysis at the downstream regions. Results from the solu- 
tions for Earth reentry and the limited results by Wilson (ref. VO for 
H^-He mixture were used. This recourse had to be used because of the 
lack of results for flow around bodies with ablation product effects and 
the lack of results for entry into planets other than Earth. Additional 
discussion of this problem is given by Page (ref. U) . 

There is no method which is generally accepted as being best, even 
when radiative transport is not included, for the shock layer solution 
around hypersonic blunt bodies (ref. 39)* This point is shown in the 
paper by Perry and Pasiuk (ref. 51) in which numerous solutions are 
compared and are compared with experimental data. There is considerable 
scatter between the different solutions even in the region of subsonic 
flow. The solution used in the present study for the radiating, inviscid 
layer is a numerical method of a time-asymptotic technique. 

Prior studies have used the time-asymptotic technique for the solu- 
tion of an inviscid flow field (see, for example, refs. 3, 6, 52 and 53). 
The time-asymptotic technique retains the time dependent terms in the 
governing equations of the flow field and permits the time to increase 
until steady-state conditions are reached. By retaining the time de- 
pendent terms, the set of governing equations is hyperbolic and the same 
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computational method can be used in both the subsonic and supersonic 
regions of the flow along the body. The development of the technique is 
due to the studies by Von Neumann and Richtmyer (ref. 5*0, by Lax (ref. 

55) » and by Lax and Wendroff (ref. 56). The present method for the solu- 
tion of the radiating, inviscid flow field is based on the studies of 
Moretti and Abbett (ref. 6), Callis (ref. 3), and MacCormack (refs. 57 
and 58 ). 

Moretti and Abbett (ref. 6) applied the time-asymptotic technique 
to flow around blunt bodies without radiative transport. The advantages 
of the method over other methods are discussed briefly by Moretti and 
Abbett (ref. 6) and more fully by Moretti and Abbett (ref. 59)* A 
comparison of their results with the data presented by Perry and Pasiuk 
showed the method to be as accurate in matching the experimental data as 
any other method. Also, it was shown that the shock wave can be treated 
as a discontinuity and thereby reduce the number of mesh points required 
in an accurate numerical solution. 

Callis (ref. 7), applied the time-asymptotic technique to stagnation- 
point solutions and Callis (ref. 3), applied the technique for flow about 
long blunt bodies. The solutions were for radiating, inviscid flow and 
showed the time-asymptotic technique to be valid for radiating flow 
fields. Callis stresses the need for treating the shock wave as a dis- 
continuity. In addition to reducing the number of mesh points, the 
property profiles are more accurately defined for the radiative trans- 
port. 
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In the studies by Callis, and by Moretti and Abbett, a Taylor series 
expansion with the first three terms retained was used for the advance- 
ment of the flow field variables in time. Thus, the solutions are of 
second-order accuracy in time and require first-order and second-order 
time derivatives of the flow field variables. A method of second-order 
accuracy has been developed by MacCormack (refs. 57 and 56 ) which re- 
quires only the first-order time derivatives of the flow field variables. 
Basically, the method involves a two-step process for the advancement in 
time with the spatial derivatives of the flow field variables taken in 
alternate directions. The general method of MacCormack is used in the 
present study and is described further in the section on Analysis. 

Anderson (ref. 60) compared the two methods of time advancement in a 
time-asymptotic technique for the steady-state, nonequilibrium, flow in 
a nozzle and states the method developed by MacCormack to require fewer 
computations and 30 percent less computer time for identical results. 

The studies by Moretti and Abbett, by Callis, and by MacCormack 
have shown the numerical methods for the time-asymptotic technique to 
be convergent, stable, and insensitive to initial guesses. A numerical 
method of second-order accuracy for the time- asymptotic technique and 
a discontinuous shock wave is used in the present study for the radiating, 
inviscid flow field solution. 

Thermal Analyses for Venusian Entry 

The fully-coupled solution for the radiating flow field with abla- 
tion product effects has been investigated in severed studies for Earth 
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reentry (refs. 19 , 22 , 28 , 29, 43, and 41 ) and Wilson (ref. 44) investi- 
gated a solution for Jupiter entry. These solutions were for the stag- 
nation region of the body. At present, there are no published results 
for a fully-coupled solution with ablation product effects at either the 
stagnation or downstream regions for Venusian entry. A good review of 
the present state of technology of thermal analyses and ablation analyses 
for Venusian entry is given by Walberg and Sullivan (ref. 10). 

The primary emphasis at the present time is for unmanned exploration 
of Venus. A description of the exploration and the scientific experi- 
ments is presented in references 6l to 64. Additional information on 
trajectories, body shapes, and body sizes for unmanned entries is given 
in references 65 to 69. The entry velocities range from 10 to 15 km/s 
with the velocities for peak radiative heating being from 7 to 13 km/s. 

The range of stagnation- point pressure on the body is 1 to 10 atmospheres. 
The exploration of Venus is a multi-probe, entry mission with one large 
probe and three small probes. The nominal body for the probes is a 
spherically capped, conical shape with a .34 meter nose radius and a 60 
degree half angle for the large probe and a .14 meter nose radius and a 
45 degree half angle for the small probes. 

Models of the Venusian atmosphere are given in references 62, 63, 
and 70. The data for the models are primarily from the flights of 
Mariner V and Venera 4. Carbon dioxide is the major gas component for 
the Venusian atmosphere with up to 10 percent by volume of nitrogen. 

Reviews of analytical and experimental studies of the radiative 
heating for Venusian entry and for gas compositions similar to Venusian 
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atmosphere are presented. In references 10, 25, 39, and 71. Therefore, a 
complete review of the literature will not he given. The results of a 
recent experimental study in a shock tube for the convective and radia- 
tive heating in air and in a ,90 CO^ - .10 mixture (mole fraction) 
are presented by Livingston and Williard (ref. 72). A review of the 
existing studies shows there is a difference in the radiative transport 
between air and CO^/N^ mixtures. The CO^/K^ mixtures begin to radiate 
at a lower temperature than air because of molecular band transitions, 
primarily CN and CO. At velocities less than 10 km/s the radiative 
heating can be as much as a factor of 10 greater than air. However, at 
velocities above 10 km/s the radiative heating is comparable in the two 
types of gases because of the domination of the atomic processes present. 

A detailed study of radiative heating in CO^/N^ mixtures is pre- 
sented in the thesis by Boughner (ref. 25). However, atomic line 
transitions were neglected and only flight velocities from 8.5 to 10.5 
km/s were considered. MoBt of the study was for a mixture of 50 percent 
CO^ and 50 percent (mole fraction) and the results showed the emission 
spectrum to be dominated by the C0{1++) band system and the red and violet 
bands of CN. 

Deacon and Rumpel (ref. 71) present results for the radiative 
heating of a .80 CO^ - .20 mixture (by mole fraction) at flight 
velocities from 5 to 16.5 km/s. The important radiators were found to 
be C0(U+) band system, continuum from carbon, and atomic transitions of 
neutral carbon. This study was for a constant property layer. Deacon 
and Rumpel states that to correct for a nonadiabatic layer the corrections 
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from air studies would have to he applied due to the lack of data for 
C0 2 /N 2 mixtures. 

Spiegel et al. (ref. 69 ), present results for the thermal protection 
of a spacecraft during a Venusian entry. This investigation was for a 
completely uncoupled solution. In the study it was assumed: the shock 

layer is isothermal, no coupling between radiative and convective heating, 
no radiation absorption by ablation products, and no radiation cooling. 

The study was for a spherically capped, conical body with a .15 m nose 
radius and a 60 degree cone half angle. The heat-shield material was 
high-density phenolic nylon. The results show the radiative heating at 
a location on the cone flank to be greater by a factor of two than the 
stagnation-point value. Also, the ablation rates of the heat-shield 
material are comparable for the cone flank and the stagnation point. 

These results need to be verified by a fully-coupled solution. 

A recent, but unpublished, analysis has been conducted by the 
present author and R. A. Falanga for the fully-coupled, radiating, flow 
field solution with ablation products injection at the stagnation point 
of a blunt body for Venusian entry.* The method of solution was similar 
to the present method except the radiating, inviscid, flow field solution 
was by the method of Falanga and Sullivan (ref. 73) and can only be used 
in the subsonic region of flow about a blunt body. The results of this 
recent study were that the boundary layer with ablation products injec- 
tion will reduce the radiative heating to the body by 35 percent at 


*Publication pending in Journal of Spacecraft and Rocket. 
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velocities of 9*86 and 11.18 km/s; tut, the reduction was only ll* percent 
at a velocity of 8.11 km/s. The injection rates were for the steady- 
state ablation of a high-density, phenolic-nylon, material. 
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METHOD OF ANALYSIS 

The radiating flow field about the entry body is separated into an 
outer layer where the inviscid flow equations are applicable and an inner 
viscous layer where the boundary layer equations are applicable. The 
divergence of the radiative flux is included in the energy equation for 
the solution of each layer and the boundary layer is coupled to the 
inviscid shock layer by the radiative transport through both layers and 
by the boundary layer displacement thickness. This coupling of the 
boundary layer solution to the inviscid shock layer solution is illus- 
trated by the temperature profile shown in Figure 1. The inviscid flow 
field is displaced from the wall by the boundary-layer displacement 
thickness and the boundary-layer profiles are used out to the point 
where the boundary-layer edge values and their derivatives equal the 
inviscid layer values. For the boundary-layer solution, the radia- 
tive transport is calculated from the mated profiles for the entire 
layer. The total thickness of the flow field now becomes 

6* = 6 + 6* (1) 

where 6 is the thickness of the inviscid shock layer (shock stand-off 
distance) and 6* is the boundary layer displacement thickness calculated 
from 



The first term on the RHS of the expression is the usual term for the 
displacement thickness of a compressible boundary layer without mass 
injection and is due to the retardation of the flow in the boundary 
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layer. The second term is the increase in displacement thickness due to 
mass injection at the wall for around the body. 

The methods of solution of the inviscid flow field, the boundary 
layer , and the radiative transport are presented in sub-sections of the 
Method of Analysis. The solution for the radiating, inviscid flow field 
about a blunt body was developed in the present study and the develop- 
ment of the flow field equations and the numerical method is described 
in detail. A second-order, time-asymptotic technique is used for the 
solution. The solution of the inner viscous layer is for a nonsimilar, 
multi component boundary layer with mass injection, unequal diffusion 
coefficients, and arbitrary chemical species. An existing computer 
program (BLIMP) is used for the boundary layer solution with modifica- 
tions made in the present study for coupling the radiative transport 
and mating the solution to the inviscid flow field. The radiative 
transport solution is for a nongray gas with molecular band, continuum, 
and line transitions. An existing computer program (RAD/EQUIL) is used 
for the solution. In addition to using RAD/EQUIL for coupling the radi- 
ative transport through the entire layer, an extensive modification of 
the program was made in the present study so that it could be used ef- 
fectively as a subroutine in the developed computer program for the 
radiative, inviscid flow field. 

The radiating, inviscid flow field solution is calculated only once 
for the fully coupled solution; but, an iteration is required to couple 
the boundary layer solution to the inviscid flow solution because of 
inclusion of the radiative heat flux in the boundary layer and locating 
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the boundary layer edge in the inviscid flow field. The boundary layer 
solution is assumed not to affect the inviscid layer solution through 
higher order effects such as recalculating the inviscid solution for an 
’'effective" body composed of the original body plus the displacement 
thickness. Also, the radiative heat flux from the boundary layer toward 
the inviscid layer is small compared to the flux from the inviscid layer 
toward the boundary layer. Thus, the inviscid layer solution should be 
only slightly affected by the boundary layer solution. The boundary 
conditions for the boundary layer edge are the appropriate values and 
their derivatives at the match point in the inviscid flow solution and 
are not the values at the wall condition of the inviscid flow solution. 

The calculation procedure for the fully-coupled solution is shown 
in Figure 2. The steps in the procedure are: 

1. An inviscid, radiating solution is calculated from trajectory data. 

2. A boundary layer solution with uncoupled radiative transport is 
calculated using the inviscid wall values for the boundary layer 
edge conditions. For steady-state ablation, the radiative heating 
to the wall is taken as the inviscid wall value. 

3. The profiles from the inviscid solution and the boundary layer 
solution are mated and the radiative transport is calculated for the 
entire layer. 

4. A boundary layer solution with coupled radiative transport is calcu- 
lated using the values at the match point of the two layers for the 
boundary layer edge values. 

5. Steps 3 and h are repeated until the radiative transport through the 
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layer, the match point condition, and the ablation rates (for steady- 
state ablation) converge. 

The inviscid flow field and the boundary layer solutions are for the 
flow around a body and the coupling of the two layers and the conver- 
gence of the final solution is applied at each location around the body. 

The solutions of the radiating inviscid flow, the boundary layer, 
and the radiative transport for the total layer are calculated by sep- 
arate computer programs which are coupled through the iteration procedure. 
Approximately nine hours of total computer time are required for a fully 
coupled solution about a body and the computer storage requirements for 
the radiative transport program, the radiating inviscid flow program, 
and the boundary layer program are 56000g, 115000g, and 256000g, 
respectively. No attempt has been made to combine the programs into a 
single computer program because of the large storage requirements and the 
large computational time. 

The effect of the boundary-layer displacement thickness on the in- 
viscid flow solution and subsequent effect on the boundary layer solution 
could be accounted for by repeating the series of calculations as required 
until convergence. The computational time for such a procedure would be 
excessive. Also, the shape of a body is changing during a high velocity 
entry due to the ablation of the heatshield. Accounting for these shape 
changes in a solution would require an extensive series of iterations. 

In the present study, the body shape is the shape prior to entry. 

The rate and elemental mass fractions for the mass injection of the 
ablation products into the boundary layer can be either prespecified or 
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calculated during a solution for steady-state ablation of a heatshield. 
The equations for the wall boundary conditions in the boundary layer 
solution includes the necessary mass and energy balances for steady-state 
ablation. Steady-state ablation is a good representation of the ablation 
phenomena at entry conditions where significant radiative heating is pre- 
sent and is better than a specification of the mass injection rate. 
Steady-state ablation is used for the representation of the ablation of 
the heatshield for the Venusian entry solutions. 

Radiating, Inviscid Flow Field Solution 

A time-asymptotic technique is used for the solution of the radia- 
ting inviscid flow field; therefore, the analysis is based on the equa- 
tions of conservation of mass, momentum, and energy for unsteady flow. 

The conditions for which the present analysis is carried out are that 
the flow is axisymmetric , inviscid, and nonconducting; the gas is in 
local thermodynamic and chemical equilibrium; the tangent slab approxi- 
mation is valid for the radiative transport; and, the shock wave is a 
discrete surface. 

The conservation equations expressed in vector notation are 

Mass : 

|£+v-(pv )=0 (3) 

Momentum : 

|j“ + V*VV - i Vp = 0 (U) 
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Energy : 

p||r + pv*Vh + V*q R - - V*Vp = 0 (5) 

Equations 3 thru 5 are for a general, orthogonal, curvilinear coordinate 
system. The coordinate system for high speed entries can be either body 
oriented (direct method) or shock orientated (inverse method). The body- 
orientated, coordinate system as shown in Figure 3 is used in the present 
analysis. 

Equations 3 thru 5 are transformed to the present, body-orientated, 
coordinate system by using relationships for vector operations as given 
in reference 7^. The necessary metric coefficients, , for the coordi- 
nate transformation are determined from the length of a differential 
line element and the general expression is 

(d £) 2 = g 1 2 (dx 1 ) 2 + g 2 2 (dx 2 ) 2 + 8 3 2 (dx 3 ) 2 (6) 

The expression for the present s, y, $ coordinate system is 

(dS,) 2 = X 2 (ds) 2 + (dy) 2 + r 2 (d<j)) 2 (7) 

Comparing this expression to the general expression, the required metric 

( 8 ) 

i 

r = y cos 0 + | sin 0 ds \ 

Jo 


coefficients are 


g-i = 


So = 


So = 


X 

1 

r 


where 


r 


X ~ 1 + Ky 


(9) 
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K = 



(9)(concl. ) 


The angle 0 is a function of the coordinate s and the magnitude of the 
angle and the functional relation to s is known from the specification 
of the body shape. 

By knowing the metric coefficients and using the relationships given 
in reference the vector operations in equations 3 thru 5 can be car- 

ried out and the equations determined for the present coordinate system. 
Applying the axisymmetric conditions that the velocity and all gradients 
in the <|> direction are zero, the conservation equations become 

Mass: 

*° (10) 

s -momentum: 


9u u jiu Kuv 1^ 9^ _ 

3t A 3s v 3y A pA 3s 


( 11 ) 


y-momentum: 

3v u 3v 3v Ku^ 1 3p n 

3t A 3s 3y " A p 3y 


( 12 ) 


Energy: 


3h,u3h. 3h 1 3p u 3p v 3p , 1 3q R 
3t A 3s v 3y " p 3t “ pA 3s " p 3y p |_3y 



= 0 


(13) 


The bracketed term of equation 13 is the divergence of the radiative 
flux with the application of the tangent slab approximation. In the 
tangent slab approximation, the derivative of the radiative flux in the 
y direction is considered in the solution but the derivative in the s 
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direction is neglected. The parameters in this section of the report 


s = 


y = 


r = 


dimensionalized 




. s’ 


p’ 

_R _ q 

Bn' 

p - 

? 

p'V' 

“cn oo 

^ 3 

pLK 



h' 

+ _ t* 

Rn' 

xi — 

V' 2 

V CO 

(Rn'/V, 

r' 

Rn' 

p = 

£l 

P» 



(lit) 


where the subscript ® refers to the free stream value and the prime to 
dimensional quantities. 

The value of y at the shock wave will vary with the s location 
around the body and will also vary with time because the shock wave 
is moving during the solution until a steady-state solution (final 
solution) is obtained. It is convenient in the solution to fix the 
location of the shock wave and this is accomplished by the transformation 

T = t 
S = s 

y = a 
1 6 

where 

6 = f(S, T) 

The quantity 6 is the shock stand-off distance and the transformation of 
equations 15 gives Y=0 for y=0 and Y=1 for y=<5. The inviscid flow field 
is now a rectangular coordinate system of length one for the Y-coordinate 
and a length for the S-coordinate as specified by the body shape. The 
value of S is zero at the centerline of the body. The differential 
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relationships to transform equations 10 thru 13 from the s, y, t 
coordinate system to the S, Y, T system are 


3( ) _ a( ) Y 36 8( ) 
at 3T 6 3T 3Y 


3LI.1i LI _ X x tan g 1U. 

3s 3S 6 A 6 tan P 3Y 


3L1. i ILL 

3y 5 3Y 


( 16 ) 


The quantity X^ is the value of X evaluated at y equals 6. Hereafter, 
subscript notation is used to denote partial differentiation with 
respect to the variables S, Y, and T. 

Applying the transformation of equations 16, the conservation 
equations 10 thru 13 become 

Mass : 

= -( Ac y * r c s - % * i u s + s t y + c ) (lT) 

S-momentum: 

"t * " ( Au y + I “s " 'T p y * pj p s + d ) U8) 

Y-momentum: 

, T“-K'l , S*i I Y' E ) (19) 


Energy: 

h T = -( Ah Y + X h S 


1 A u \ 

p P T “ p P Y “ pX P S p / 


where 


v Y jf uY . 0 

6 " 6 6 T “ X & tatt 6 


B = g- X fi tan 3 


( 20 ) 


( 21 ) 


( 22 ) 
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C = sin 0 + 

r 

* 

+ 

o 

o 

*-J to 
CD 

(23) 



(2U) 

E Ku 2 

E - X 


(25) 

J 1 R . R 
F 1 

(f + ss H) 

(26) 

A = 1 + K6Y 


(27) 

A fi = 1 + K6 


(28) 


The maBS equation, equation 17, is now changed from density as the de- 
pendent variable to pressure as the dependent variable. This is accom- 
plished by using the state equation in the functional form 

h = h{p,p) 

to obtain the differential relations 



Using the differential relations of equations 29 and combining equations 
17 and 20, a new equation for the conservation of mass is obtained in 
the form 
Mass : 

P T = -[ Ap Y + X P S + P 3 (x u S->“Y , ! , r* C )-y 



(30) 



3 ^ 


where 



P 


The values for the thermodynamic variables of p, P^, and P^ are 
determined by the conditions of chemical equilibrium for the gas with 
the specification of the elemental mass fractions of the gas and the 
two thermodynamic state variables of pressure and enthalpy. The depen- 
dent variable in the mass equation was changed from density to pressure 
as the dependent variable because density cannot be used as one of the 
specified thermodynamic state variables in the chemical equilibrium 
program used in the present study. Any two of the equations IT, 20, or 
30 can be used in the inviscid flow solution depending on the method 
used for the thermodynamic state. 

The basic equations for the solution of the radiating, inviscid 
flow field are equations 18 thru 28 and equations 30 thru 32. The terms 



which appear in equations 23 and 26 are indeterminant at the centerline, 
S=0, and are evaluated by the L* Hospital rule. 

The solution for the location of the shock wave and the flow field 
variables along the shock wave (Y=l) is by a method using a quasi, one- 
dimensional, unsteady characteristic solution and the Rankine-Hugoniot 
equations for a moving shock. This method is discussed by Moretti and 
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Abbett (ref. 6) and by Callis (ref. 7). A derivation of the equations 
for the characteristic solution is presented in Appendix A. The equation 
for a right running characteristic is 


JT 
A + _l 

dT A 6 


and the compatibility equation is 

1 d p - c 

dT p^ dT £ 




(33) 


(34) 


where 



(35) 

(36) 


The set of derived equations for the radiating, inviscid flow 
field about a blunt axisymmetric body is solved by the numerical methods 
presented below. In addition to the complete body solution, a separate 
solution for only the stagnation point of a blunt body was obtained 
in the present study and the equations are presented in Appendix B. 

The concept of the time- asymptotic technique is to assume initial 
values for the flow field variables and then to increment the variables 
in time until the variables are invarient with time. Thus, the evolution 
of the flow in time is followed until the flow obtains a steady-state 
condition. The numerical method used in the present study to obtain 
a solution is based on the two-step method of MacCormack and a description 
of the numerical analysis for the method is given in references 57 and 
5.8, 
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At time T the value of a variable is known at all locations in the 
* flow field. The advancement of a variable from time T to T+AT (one 
iteration) is given by 


where 


f(S,Y,T+Al) = f(S,Y,T) + f* Ve AT 


f£ Ve = (fj + f®)/2 


(37) 


(38) 


The symbol f represents the variable p, u, v, or h and the superscripts 
1 and 2 refer to the first and second step in the two-step process. The 
time derivative, f^, of the variable is calculated from the unsteady 
equations (equations 18, 19, 20, or 30) with finite differences used 

fl-V© 

for the spatial derivatives. The calculation of f^ and the advancement 
from T to T+AT is a two-step process as follows: 

1. Compute f^ at time T from the unsteady equations using forward 


differences for the spatial derivatives. Advance f by 

f .. - f + fi AT 
n+1 n T 


(39) 


2. Compute f^ at n+1 from the unsteady equations using the variables 
*n+l ^^^ward differences for the spatial derivatives. Then, 

81V6 

compute the average value of the time derivative, f^ , by equation 
38 and advance the variable, f, to time T+AT by equation 37. 

Step 1 is applied to each variable p, u, v and h at sill S, Y locations 
before proceeding to step 2. 

A modification to the basic method of MacCormack for the spatial 
derivatives is used in the present study. In the basic method, two- 
point, forward finite differences are used for the first step and two- 
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point, backward differences are used for the second step along all 
coordinates. In the present method, three-point, central finite differ- 
ences are used for the derivatives with respect to the S-coordinate for 
both steps in the two-step process . Three-point , forward differences on 
the first step and three-point, central differences on the second step 
are used for the derivatives of h and u with respect to the Y-coordinate . 
The derivatives of p and v with respect to the Y-coordinate are the basic 
method of two-point forward on the first step and two-point backward on 
the second step. A Taylor series expansion is used for the derivation 
of the finite difference equations for unequal spacing of the nodal 
points along each coordinate. The same equations are also valid when 
equally spaced points are specified. 

The above numerical method is used for all nodal points except the 
nodal points along the shock wave ( Y<=1 ) . The flow field variables at 
the nodal points along the shock wave and the location of the shock 
wave are calculated by a numerical method using the equations from the 
quasi, one-dimensional, characteristics analysis and the Rankine-Hugoniot 
equations for a moving shock wave. The numerical method is illustrated 
by the diagram in Figure It. At time T all the quantities are known 
and the properties at D, 6, and 6 T are desired at time T+AT . The 
solution procedure is as follows: 

1. Assume a 6^ at time T+AT and use trapezoidal integration to 
determine 6 by 

6(T+AT) = <5(T) + Jfi T (T) + 6 T (T+AT)J-~ (40) 
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The angle 3 is calculated by 


tan $(T+AT) =[j ■£§-} 

V s 


(4l) 


2. The properties of p, u, v, and h at point D are calculated from the 
Rankine-Hugoniot equations for a moving shock with the known free- 
stream properties, the assumed 6^,, and calculated 3. 

3. Point B is located from the characteristics equation (eq. 33) by 


v£7 


AY = A + 


) 


AT 


( 42 ) 


'ave 


where averaged properites of points B and D are used for the inte- 
gration. The properties at point B are averaged properties of points 
A and C. 

4. A value of v at point D is computed from the integration of the 
compatability equation (eq. 3^) from point B to point D using 
averaged properties 


V D = V B + C 2 + 



AT - 


ave 



<w 


ave 


(43) 


The value for p D is the value calculated by the Rankine-Hugoniot 
equations in step 2. ^ 

5. The computed value of v^ from the compatibility equation is compared 
with the value calculated from the Rankine-Hugoniot equations in 
step 2. If the values for v^ do not match, then a new value for 
6_(T+AT) is assumed and steps 1-5 are cycled until convergence. 


The numerical method is applied at each time step for each S-coordinate 
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location beginning with the S-0 location. The method is converged at 
each S location before proceeding to the next location around the body. 

A Newton-Raphson method is used for successive guesses for 6^ after the 
first two guesses. 

The value of the shock stand-off distance, 6, at each S location is 
Checked by a mass balance. For the mass balance, the mass flow through 
a plane in the flow field at the particular S location is equal to the 
mass flow from the free stream through the shock wave up to the particular 
S location. The expression for 6 from the mass balance is 

r b 

6 = 2(SF - r^ cos 6) 


where 


SF 



(rpu)dY 


( 45 ) 


To insure a mass balance for the converged solution, the shock stand-off 
distance at each S location is adjusted if necessary to the value from 
equation 44 as the solution approaches convergence. 

The size of the time step for the advancement at each iteration 
is calculated by the use of the characteristic equation (eq. 33) in 
the form 

AT < — (46) 

A + (v^/6) 

This stability criterion is based on the Courant-Friedricks-Lewy 
condition and insures that the net slope is less than the characteristics 
slope for hyperbolic equations (ref. 75, chap. 9) • Equation 46 is a 
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one-dimensional equation being used for a two-dimensional problem; 
however, the AY is smaller than AS in the problem and no stability 
problem was encountered. A time step is calculated at each nodal point 
in the flow field and the minimum value for the nodal points along a 
ray at a S-coordinate is used for all the points along that particular 
S-coordinate. There is a large variation in time steps around the body 
and using a varying time step around the body requires less iterations 
for convergnece than using a minimum time step for the entire flow 
field. Having a different time plane through the flow field did not 
affect the converged steady-state solution. 

The radiative heat flux, the thermodynamic properties, and the 
solution of the Rankine-Hugoniot equations are calculated by using the 
computer program of Nicolet (refs. 9 and 32). A modified version of 
this program is used as subroutines to the computer program developed 
for the radiating, inviscid flow field. A discussion of the method of 
calculating the radiative heat flux and the modifications are presented 
in the sub-section of Radiative Transport. Large computational times 
are required for the calculation of the radiative heat flux and the 
thermodynamic properties; however, these parameters do not have to be 
updated at each iteration. A study was made and it was determined that 
the thermodynamic properties and radiative heat flux can be calculated 
every 50 to 100 iterations without affecting the converged solution but 
greatly reducing the computational time. For the iterations when the 
thermodynamic subroutine is not used, the density is calculated by 


&P 


Ah 




P P 
13 


Ap 


(UT) 
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with the thermodynamic properties and held constant . 
P^ and P^ are calculated by 



The properties 


(48) 



(49) 


where 
c is 


P 

given 


T is temperature, a is sonic velocity, M is molecular weight, and 
specific heat. The non-dimensionalization of the properties is 





(50) 


where the subscript s refers to the conditions behind a normal shock. 

The expressions are derived from equations 31 and 32 by using thermo- 
dynamic relations. The necessary properties for calculating P^ and 
by equations 48 and 49 are available from the thermodynamic subroutine. 
Pressure and enthalpy which are calculated by the unsteady equations are 
used as the two specified, thermodynamic state variables for the thermo- 
dynamic subroutine and the radiative heat flux subroutine. The solution 
of the Rankine-Hugoniot equations for a moving shock wave is calculated 
by the usual Rankine-Hugoniot equations with the velocities on either 
side of the shock made relative to a fixed shock location. As mentioned, 
a solution for the Rankine-Hugoniot equations is included in the program 
of Nicolet. 

The initial values to begin a solution are calculated by assuming 
the shock wave is stationary and the shock stand-off distances around 
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the body axe equal to the shock stand-off distance at the centerline 

(S=0). The value at the centerline is calculated by a correlation from 

reference j6 of 6 = . 78 /p where p is the nondimensional density 

5 £ 

behind a normal shock and 6 is the nondimensional stand-off distance. The 
flow field variables for the nodal points along the shock wave are calcu- 
lated from the Rankine-Hugoniot equations. The variables for the wall nodal 
points are calculated by assuming an isentropic expansion along the body 
with a Newtonian pressure distribution. Values for intermediate points 
in the flow field are calculated by linear interpolation of the shock 
and body values. 

The convergence of a solution is determined by checking the change 
in enthalpy between iterations. The percentage change in enthalpy 
between two successive iterations must be less than a specified small 
value and this criterion must be met for a specified number of iterations. 
The enthalpy at the body, shock, and midpoint along a ray at each S 
location is checked. 

A computer program was developed for the numerical solution of the 
radiating, inviscid flow field. The program i3 written in FORTRAN IV 
language for CDC 6000 series computers. A listing of the program is 
given in Appendix C. 


Boundary Layer Solution 

The boundary layer equations are for a nonsimilar, multicomponent 
boundary layer with mass injection, unequal diffusion coefficients, and 
arbitrary chemical species. The solution of the equations is by a 



numerical, integral matrix method and there is an existing computer 
program for the solution called BLIMP. Many types of complex, reactive 
■boundary layer problems can be solved by the program and numerous pub- 
lications are required for a complete description of the program and the 
concepts and methods used in a solution. A brief discussion is presented 
of the basic method and of the modifications to the program made in the 
present study. A list of the significant publications is given after 
the discussion of the basic method. 

The present discussion of the basic method is from reference 8. The 
boundary layer equations for an s, y coordinate system of a blunt, axi- 
symmetric body (see Figure 3) are 
Mass: 

3(pur ) 
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s-momentum : 

_ 3u 3u 3 [V \ 3u”| 3p 

37 * ¥ * ¥[(“ + B£ m)wJ * 

y-momentum: 



Energy : 


3H 


3H 
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vhere 



(52) 


(53) 

(5M 

( 55 ) 


Species: 

3K. 


3K. 


3K, 
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The species' conservation equation is solved in terms of elemental mass 
fraction, IL , rather than the species' mole fraction by the application 
of the Shvab-Zeldovich transformation. This transformation eliminates 
the chemical source term for chemical equilibrium and reduces the number 
of species' conservation equations from the number of species to the 
number of elements. For a boundary layer with ablation products injec- 
tion, the number of species is typically from 20 to 50 whereas the number 
of elements is only 2 to 6. 

The complexity of using unequal diffusion coefficients for a 
multicomponent mixture is reduced by a bifurcation approximation for the 
binary diffusion coefficients. The approximation is expressed as 
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where D is the self-dif fusion coefficient of a reference specie and 
F^, Fj are the diffusion factors for species i and J. The of a 
specie for a given chemical system can be determined by finding the set 
of diffusion factors that gives the minimum total system residual error 
and a method is presented in reference 77* The bifurcation approximation 
permits the diffusive flux of element i to be expressed explicitly in 
terms of properties and gradients of element i and of the system as a 
whole, but not of other elements. Also, the l(I-l)/2 binary diffusion 
coefficients are replaced by I diffusion factors where I is the number 
of chemical species. 

The diffusional mass flux of element i in the species' conservation 
equation (eq. 5 6) can be expressed as 
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by use of the bifurcation approximation and the definition of the new 


quantities 


M,x 


Z j “ F y 
J J M 2 


“i 
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The subscript J refers to species and the subscript i refers to elements. 

The quantity a. . is the mass fraction of element i in species j and Z, 
ij J 

is a quantity which for unequal diffusion lies between a mass fraction 
and a mole fraction for species j. 

c 

The convective heat flux term q in the energy equation (eq. 5*0 
is the sum of heat flux due to conduction, diffusion, turbulence, and 
dissipation of kinetic energy. Using the bifurcation approximation for 
the heat flux due to diffusion, the convective heat flux can be ex- 
pressed by 


C 

1 




ay 


(k+pE^ 


. 3? 

c p 9y 


pe 


d\ 3y 



c + (h - h) 
P 3y 



(60) 


where 




(61) 


The turbulent transport terms in the equations are expressed in 


the Boussinesq form of eddy viscosity, eddy diffusion, and eddy 
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conductivity. If turbulent transport is considered, the turbulent 
transport properties are included in the boundary layer equations when 
a pre specified Reynolds number is exceeded. The Reynolds number is 
based on edge properties and momentum thickness. A transition region 
between laminar flow to turbulent flow is not included. 

The boundary conditions at the boundary layer edge are the specifi- 
cations of u, H, and SL and their derivatives with respect to the y- 
coordinate. The wall boundary conditions allow for the possibility of 
solving numerous types of problems and thus specification of different 
variables. However, all the variations include zero slip at the wall, 
u w =0, and involves in some form the assignment of values for mass in- 
jection rate, ( pv)^i wall enthalpy or wall temperature, h^ or T w ; and 

elemental mass fractions at the wall , K. 

’ i,w 

The equations of the wall boundary conditions for energy balance 
and elemental mass balance allow a solution for steady-state ablation 
of a heatshield. The energy balance is 

-qp - qP -ae T^-(pv)h+mh+mh-q , = 0 (62) 

^w ww ww gg cc ^cond 


where the subscripts g and c refer to the pyrolysis gas and char for 

ablation and q .is the heat conducted into the ablation material at 
cond 

the wall surface. For steady-state ablation 


mh +mh - q ^ m h 
g g c c ^cond a a 


(63) 


where m is the total ablation rate, m plus m , and h° is the heat of 
a g c a 
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formation of the undecomposed ablation material. Noting that 

((">„ * -v 

then the surface energy balance for steady-state ablation is 


( 64 ) 


-qf - <L - oe + m (h° - h ) 
t* w w a a w 


= 0 


( 65 ) 


The elemental mass balance is 


m /i,g + m A,c- (pv) w g i,w“ Ji,w = 0 
and, for steady-state ablation 


( 66 ) 


m K . + m K, ^ = m K 

g i,g c i,c a i,a 


( 67 ) 


thus, the elemental mass balance for steady-state ablation is 


"a <E i,a * E i,v> - Jl.v ‘ 0 


( 68 ) 


A solution for steady-state ablation does not require knowledge of 
the in-depth response of the ablation material but only the surface 
interactions between the boundary layer and the ablation material. From 
equations 65 and 68, it is shown that the additional properties of the 
elemental mass fractions and heat of formation of the undecomposed 
ablation material and the wall emissivity are all that is required for 
a steady-state ablation solution. The solution of the surface balances 
gives the basic boundary conditions of injection rate, enthalpy, and 
elemental mass fractions at the wall. 



An 5, n coordinate system is used for the actual solution of the 


boundary-layer equations by the transformations of 


« S 2 ' 
£ - I u p y r, ds 
■ e e e b 
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T - u y 

T1 » 1 f p dy 

^Jo 


and a stream function of 


f - f . r n a 

V I u 
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(69) 


(70) 


The transformed equations will not be presented. 

The numerical procedure for the solution of the boundary layer 
equations is an integral matrix method. The boundary layer is divided 
into strips in the normal direction (n coordinate) and the conservation 
equations are integrated across the strips. Across a strip, the primary 
dependent variables of velocity, total enthalpy, and elemental mass 
fractions and their derivatives with respect to T) are related by Taylor 
series expansions with cubic or quadratic fits. Implicit, finite dif- 
ference expressions are used for the derivatives in the streamwise di- 
rection (£ coordinate). The Bet of simultaneous equations which 
includes the Taylor series, the conservation equations, and the boundary 
conditions are solved by general Nevton-Raphson iteration using a matrix 
inversion technique involving successive matrix reductions. 

Many aspects of the BLIMP program have been left out in the above 
discussion. Further information for the boundary layer method and the 



BLIMP computer program is presented in the following references. The 
solution for the boundary layer equations is given in references 8, 18, 
78, and 79- The solution is for an arbitrary, multicomponent gas mix- 
ture and the method for the thermodynamic properties for chemical equi- 
librium is given in reference 80 and the method for the mixture transport 
properties is given in reference 8l. A method for considering a boundary 
layer for a blunt body solution with entropy layer is presented in 
reference 82. Information on the turbulent transport model is given in 
references 79 » 82, and 83. User’s manuals for the BLIMP program are 
references 81* to 86. The description of a companion analysis for in- 
depth response of an ablative heat shield is given in reference 87. 

Modifications to the BLIMP program were necessary in the present 
study to clarify the coupling of radiative heating and to make the 
boundary layer edge conditions compatible with the inviscid flow field. 
The radiative heating was included in the formulation of the energy 
equation and in the coding of the BLIMP program; however, the values 
for the radiative heating were set to zero in the program and no pro- 
vision was made to input the values. The term (q + q ) was considered 
as being only convective heating, since q was set to zero, and was used 
in expressions in the program which are only applicable for convective 
heating. When the radiative heating, q , is included in the term 
(q + q ) these expressions are invalid. There was a provision for 
inputing radiative heating to the wall, unattenuated by the boundary 
layer, for use in the wall energy balance for steady-state ablation. 

The convective heating for the energy balance was represented by the 
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term (q + q ) at the wall and if the radiative heating through the layer 
is included in the term hy q then the radiative heating at the wall is 
accounted for twice and the energy balance is invalid. The BLIMP program 
was modified by re-defining certain expressions to clarify the difference 
between convective and radiative heating and to properly input the radi- 
ative heating at the nodal locations. 

The derivatives for the edge boundary conditions are set in the 
BLIMP program as the usual boundary layer edge condition of 



These boundary conditions consider that u, H, and FL are invariant with 
y in the inviscid layer. The edge conditions of zero for the velocity 
and total enthalpy gradients may not be of sufficient accuracy and may 
give incorrect results for the boundary layer solution because of non- 
adiabatic effects when radiative transport is present and when an en- 
tropy layer is present in the inviscid flow field of a blunt body. 

There are several methods in BLIMP for considering the effect of an 
entropy layer for a blunt body and for these methods the derivatives are 
specified by appropriate values and not set to zero. However, the me- 
thods did not consider the effect on the derivatives for a non-adiabatic 
inviscid flow field from radiative transport and were not appropriate for 
the present study. The BLIMP program was modified in the present study 
so that the derivatives of velocity and total enthalpy with respect to 
the y coordinate can be specified by inputs and correctly transformed to 
the rv coordinate. Also, a modification was made for specifying the total 



51 


enthalpy at the boundary layer edge around the body. These modifications 
allow for equating the boundary layer edge values with the values of the 
radiating, inviscid flow field at the match point in the flow field. 

Radiative Transport Solution 

The solution of the radiative transport is for a nongray gas with 
molecular band, continuum, and atomic line transitions. A detailed 
frequency dependence of the absorption coefficients is used in the in- 
tegration over the radiation spectrum and the tangent slab approximation 
is used for integration over physical space. An existing computer pro- 
gram (RAD/EQUIL) by Nicolet (refs. 9 and. 32) is used for the calculation 
of the radiative transport. The present section presents a brief dis- 
cussion of the method and the modifications to the computer program when 
used as subroutines for the radiating, inviscid flow field solution. 

The tangent slab approximation treats the radiative transport as a 
one-dimensional problem in the direction normal to the body. Thus, the 
equations for the radiative transport are derived for a gas confined 
between two infinite parallel boundaries and the property gradients of 
the gas are considered as zero except in the normal direction between 
the boundaries. For the present problem, the boundaries are the shock 
and the body and the normal direction is perpendicular to the body. The 
tangent slab approximation is applied locally at each location around 
the body. Note, the tangent slab approximation is used only for the 
radiative transport calculations and not for the gradients of the thermo- 
dynamic state and flow properties for the flow field solution. 
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The radiative heat flux across a surface at a point in the gas layer 

is R 

dq^ = 1^ cos y dfi (71) 

where I is the intensity, y is the angle between a ray and the normal, 
and ft is the solid angle. The basic equation for the intensity gradient 
along a ray for a gas in local thermodynamic equilibrium is 


ai 

— - = y (B - I ) 
di V V V 


(72) 


vhere is the linear absorption coefficient corrected for induced emis- 
sion and is the Planck function* The solution of equations 71 and 72 
at a point y in the gas layer for the directional, radiative heat flux 
is given by Nicolet in the form 


+ 

+ = TtJq B v ( £ v) d£ V 




*”(y) = it j" 
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B (e ) de* 

V V V 


(73) 


where heat fluxes into the slab at the boundaries are neglected. The 
net flux at point y is 


R 

q 



q R * + (y) dv - 



q R, ”(y) d.v 


<7*0 


The plus sign in the superscripts referes to the heat flux in the direc- 
tion toward the shock and the negative sign for the flux toward the body. 
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Nicolet solves the flux equation in a Planck function, B^, and 
emissivity, coordinate system where 

\ ' f 0 Hi <T5) 

( 76 ) 

where t^ are the dummy values of optical depth and E n (z) is the exponen- 
tial integral of order n. For the solution hy Nicolet, the exponential 
integral of third order is approximated by 

E 3 ( a , ( 77 ) 


e. ■ 1 - 2E_(x , - t )» t < t 
v 3 v v* v-v 


e, = 1 - 2 E_{t - t ), t > t 

v 3 u v ’ v-v 


and the expressions for emissivity "become 


£ V ~ 1 " exp [2(t v ■ T v )] 
e v ~ 1 - exp [2(T v • \ )] 


( 76 ) 


The spectral absorption coefficient for a gas mixture is in general 


P v = 5 ^^) +£bj(v) 


( 79 ) 


where the first term is the continuum contribution with a summation over 
all continuum transitions and the second term is the line contribution 
with a summation over all line transitions. The absorption coefficients 
are calculated in the RAD/EQUIL program and the theoretical expressions. 



approximations, and experimental data of the various transitions for the 
species are given in detail in the report of Nicolet (ref. 9). Transi- 
tions of the species N, C, H, 0, H - , C - , if, (f , H 2> C 2 , N 2 » C> 2 , NO, CO, 
CN, and N* are considered for the radiative transport. 

In the computer program, the radiative heating is separated into 
heating due to continuum transitions and line transitions. The continuum 
contribution is calculated by using only the first term of equation 79 
for the spectral absorption coefficient and then the line contribution 
is calculated by 


R,L 

V 


R R,C 
%> * \ 


(80) 


where the total absorption coefficient is used for the q^ value. The 
molecular transitions are treated as an "equivalent” continuum process 
by a bandless model in which the bands within each band system are 
smeared by J 


“v* 


av p v dv 

1 v 


(81) 


where the frequency increments Av are selected so that varies smoothly 
over the frequency spectrum of the hand system. The molecular transitions 
are included in the continuum contribution to the radiative flux. 

For the continuum calculations, the frequency spectrum in terms of 
photon energy (h*v) is divided into U8 frequency nodal points over the 
range 0 to 15 ev. The frequency nodal points are not equally spaced 
over the spectrum but are spaced to resolve the frequency variation of 
the absorption coefficient especially at photoionization edges. The 
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number of node points, frequency range, and spacing are inputs to the 
program and the above values were used in the present study. 

The line grouping technique is used for the atomic line transitions. 
In this technique, the line transitions near a specified frequency value 
are grouped together and the radiative heating is given as that from the 
line group. However, each line within the group is treated individually 
and can assume unshifted Lorentz or Doppler line shapes or a combination 
of the two with the half widths including the Stark, resonance, and 
Doppler effects. The frequency grid for each line is composed of 13 
nodal points and the grid is dependent upon the characteristics of the 
gas layer as well as the individual line. Twenty line groups with a 
total of 13h lines are used in the present study. The line groups are 
not connected over the frequency spectrum, hut are spaced according to 
the frequency locations of the line transitions. 

The thermodynamic properties and species concentrations required 
for the calculation of the spectral absorption coefficients and Planck 
functions are calculated in the computer program by a chemical equili- 
brium method from the specification across the spatial grid of the 
enthalpy (or temperature), pressure, and elemental mass fractions. Only 
the species as given above are used for the radiative transport calcula- 
tions ; but, additional species can be included in the chemical equilibri- 
um calculation. A method for the solution of the Rankine-Hugoniot equa- 
tions for shock waves is also included in the program. The methods for 
the chemical equilibrium solution and the Rankine-Hugoniot solution are 
given in the report by Nicolet. The calculation of the thermodynamic 
state is consistent throughout the fully-coupled solution because the 
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Chemical equilibrium method is the same in both the RAD/EQUIL and the 
BLIMP programs. 

Briefly, the solution procedure for the radiative transport is that 
the chemical equilibrium calculations are made for the specified spatial 
grid. The spectral absorption coefficients, Planck functions and optical 
depths are calculated. Then the emissivities are calculated and the 
transformation to the B^, coordinates i6 made by knowing and 
as a function of y. The heat flux equations are then integrated. Cubic 
integration formulas are used for all integrations except for the fre- 
quency integration of the continuum flux. These integrals are evaluated 
by linear formulas because of the discontinuity at photoionization 
edges. 

i .. The RAD/EQUIL computer program is used for the calculation of the 
radiative transport through the total layer from the coupling of the 
boundary layer to the inviscid layer. This is step 3 in the calculation 
procedure. Also, a modified version of the RAD/EQUIL program is used as a 
subroutine in the computer program for the radiating, inviscid flow 
field solution. The following comments refer to the modified version. 

A separation between the subroutines for the radiative transport calcu- 
lations and the chemical equilibrium calculations was made in order that 
the chemical equilibrium calculations can be performed without calcu- 
lating the radiative transport. The chemical equilibrium subroutine 

' t 

was modified by the addition of a routine to calculate the necessary 
thermodynamic properties for the evaluation of the P 1 and properties 
i required for the inviscid flow solution. The required addition was 
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taken from the chemical equilibrium version in the BLIMP computer pro- 
gram. The method for calculating thermodynamic derivatives for the chem- 
ical equilibrium version in BLIMP is given in reference 80. Also, the 
storage requirement was reduced by deleting options which were not re- 
quired, by reducing the maximum number of spatial nodal points, and by 
reducing the maximum number of chemical species in the chemical equili- 
brium solution. The modified version of the RAD/EQUIL program was then 
mated to the computer program for the radiating, inviscid flow field 
solution. 



RESULTS AND DISCUSSION 


A computational method has been developed for the fully-coupled 
solution of nongray, radiating gas flow with ablation product effects 
about blunt bodies during planetary entries. Application of the devel- 
oped method is shown by results for Venusian entries. There are no 
published results for a fully-coupled solution of the radiating flow 
about ablating, planetary entry bodies; therefore, the validity of the 
present method is shown by comparing the results from solutions to sub- 
components of the method with published results of corresponding 
solutions . 

The present method for the solution of an inviscid flow field is 
compared with existing methods for both non-radiating and radiating gas 
flows about blunt bodies during Earth reentry. Results from solutions 
by the present method for the radiating, inviscid flow about blunt 
bodies are also presented for planetary entries. The present method 
for a fully-coupled solution with ablation product effects is compared 
with an existing method for the stagnation point of blunt bodies for 
Earth reentry. Results from the present method are then presented for 
the fully-coupled solution about blunt bodies for Venusian entries. 

Several comments are given about the presentation of the results. 

In the present coordinate system, the radiative heating directed toward 
the shock wave is positive and the radiative heating directed toward the 
body is negative , However, the radiative heating rates at the wall are 
given by positive values in the presentation of results. As stated in 
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the section of Radiative Transport Solution, the radiation contributions 
by molecular band transitions are included in the continuum contribution 
to the radiative heating* The total contributions of molecular band 
transitions and continuum transitions are referred to by continuum 
processes. The line grouping technique is used for the atomic line 
transitions and the spectral distributions for the line transitions are 
given by the contribution of the line group and not by the individual 
lines . 


Non-Radiating, Inviscid Air Solution 

The present method for an inviscid flow field has been used to 
obtain a solution for the nonradiating flow about a spherically capped, 
conical body during an Earth reentry. The results are presented in 
Figure 5 and are compared with results by the method of Inouye _et al. 
(ref. 88). The method of reference 88 is considered to be one of the 
more accurate methods and provides a good means of evaluating the accu- 
racy of the present method for an inviscid flow field solution. 

The solution is for the free-stream conditions and body shape 
given in Figure 5(a). The results for the shock shape at the forward 
region of the body and the location of the sonic line are presented in 
Figure 5(b). Figure 5(c) presents the results for the shock shape at 
the downstream region of the body. Because the thickness of the shock 
layer is much smaller than the dimensions of the body, a better means 
of comparing the shock shape is the shock stand-off distance and these 
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results are presented in Figure 5(d) . The results for the shock stand- 
off distance illustrate the inflection points in the shock shape around 
the body. The results from the present method are in good agreement 
with the results by the method of reference 88 for the shock shape, 
especially considering the inflection points, and for the sonic line 
location. 

The results for the distribution of tangential velocity and pres- 
sure along the body are presented in Figures 5(e) and 5(f), respectively* 
The results from the present method are in good agreement with the 
results by the method of reference 88 even in the region of the over- 
expansion of the flow at the sphere-cone junction* 

The good agreement between the present results and those by the 
method of reference 88 indicates the present method provides a good 
solution for the inviscid flow about a blunt body* Radiating flow is 
not treated by the method of reference 88. 

Radiating, Inviscid Solutions About Blunt Bodie s 

Results are presented from solutions of the radiating, inviscid gas 
flow about blunt bodies during planetary entry. The present results for 
solutions of entries into the Earth’s atmosphere are compared with 
existing methods* 

The present method is compared with the method of Callis (ref. 3) 
for an Earth reentry and the results are presented in Figure 6* The 
free-stream conditions and body shape are given in Figure 6(a). The 
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distributions of the wall pressure and the shock stand-off distance are 
presented in Figures 6(b) and 6(c), respectively. The two methods are 
in good agreement for these parameters. The distribution of wall, ra- 
diative heating rate is presented in Figure 6(d). The results by the 
two methods are in reasonable agreement at the forward region of the 
body; however, there is a considerable difference between the methods 
at the downstream region of the body. The results by Callis are greater 
by a factor of two than the present results at the downstream region. 

An analysis was done to explain the difference between the methods. 
The thermodynamic profiles of temperature and pressure and the shock 
stand-off distances from the results by Callis were used as inputs to 
the radiative transport program, (RAD/EQUIL) , used in the present 
method. The results of this calculation are compared with the present 
results in Figure 6(e). As shown by the data, the distributions of wall, 
radiative heating rate is now in good agreement at the downstream region. 
A similar type of analysis had to be used by Suttles (ref. 89) in com- 
paring his results with Callis for large stand-off distances at the 
stagnation point of blunt bodies. The radiative heating rates by Callis 
were greater than those of Suttles for larger stand-off distances. 

Results from the present method and the method of Callis are in 
good agreement for nonradiating flow solutions. The difference between 
the methods for radiating flow is attributed to the radiation models. 

The radiation model used by Callis (refs. 3 and 7) was developed by 
Olstad (refs. 2 and 26) and is based on a "step-model" approximation 
for the frequency dependence of the absorption coefficient. It is 



62 


possible that this radiation model by Olstad treats the radiating gas as 
being too transparent** Thus, more radiation is transmitted to the body 
and this effect would be more noticeable the greater the shock stand-off 
distance* 

The present method was used to calculate the radiative heating rate 
to the stagnation point of a blunt body for a range of nose radii and 
the results are compared with the method of Callis (ref, 7) in Figure 7. 
The same radiation model was used by Callis in references 3 and 7- The 
results by Callis are greater than the present results and the difference 
increases with the shock stand-off distance (nose radius) - 

A solution was obtained for the same conditions as previously given 
in Figure 6(a), except the nose radius was increased to 2*0 meters. The 
distribution of radiative heating rate is presented in Figure 8. The 
results of Callis are 30 percent greater than the present results at the 
forward region of the body as well as the downstream region. 

The stagnation-point heating rates from solutions by the present 
method and the method of Callis are compared with the methods of ref- 
erences 73 and 89 in Table I for two nose radii. The methods of ref- 
erences 73 and 89 can only be used for the flow in the subsonic region 

of a blunt body. For the smaller nose radius, the results agree within 

15 percent. For the larger nose radius, the present results and those 
by references 78 and 89 agree within 5 percent; but, the result by Callis 
is 50 percent grdater. The radiation model (RATRAP , ref. 30) used by 

*Personal Communications with Dr* W. B. Olstad, Langley Research 

Center, Hampton, Virginia. 
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references 73 and 89 treats the frequency dependence of absorption co- 
efficient in detail as does the present radiation model (RAD/EQUIL, ref. 
9). As stated in the section Radiation Transport Modeling, Suttles (ref. 
32) made a comparison of these radiation models and concluded that the 
RAD/EQUIL program was the better model. The present method is in agree- 
ment with other methods which use a detailed radiation model. 

The previously available results for the radiating, inviscid flow 
about blunt bodies have been provided by the analysis of Callis (ref. 3) 
and Olstad (ref. 2). The step-model approximation developed by Olstad 
was used in both methods for the treatment of radiation. Olstad uses 
an approximate method for the solution of the flow field and the method 
is inverse, shock shape specified, rather than direct, body shape speci- 
fied, as the present method. For these reasons, the present method was 
not compared with the method of Olstad. Since the same radiation model 
was used by Olstad and Callis, the results of Olstad should not agree 
with results by the present method. 

The difference in the results between the present method and the 
method of Callis (ref. 3) for the radiative heating rates is attributed 
to the different radiation models used in the methods. The radiation 
model used in the present method treats the frequency dependence of the 
absorption coefficient in detail and is a more accurate model than the 
step model used by Callis. From the above analysis, it is concluded 
that the present method provides a good solution for the radiating, 
inviscid gas flow about blunt bodies. 

Callis (ref. 3) and Olstad (ref. 2) state that the nondimensional, 
radiative heating rate distributions along blunt bodies are nonsimilar 
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with respect to body angle and nose radius. Suttles (ref. 89) states 

that the nondimens ional, radiative heating rate distribution along the 

body at the subsonic region of flow for hemispheres to be relatively 

insensitive to the size of the nose radius. These results are based on 

entries into an air atmosphere. The heating rates along the body are 

R R 

nondimensionalized by the stagnation-point value, q /q , and the dis- 

W w , O 

tance along the body is nondimensionalized by the nose radius, s/Rn. 

The present method was used to investigate the above mentioned 
trends. The results presented are for spherically-capped, conical 
bodies since this is the body shape presently being considered for plan- 
etary entries. However, the present method is not restricted to this 
type of body shape. Results from stagnation-point solutions are also 
presented. 

Results of radiative heating distributions from solutions for 
entries into different atmospheres and different entry conditions are 
presented in Figure 9. The results for the two entry conditions of the 
COj-Nj mixture are representative of entry to Venus and the results for 
the ^-He mixture are representative of entry to Jupiter. Note that the 
distributions are highly nonsimilar for the different cases. The results 
for case C and D are for the same atmosphere but different entry condi- 
tions; but, the distributions are nonsimilar. The present method can 
be readily used for entries into atmospheres other than air. 

A comparison of the stagnation-point, radiative heating rates for 
entries in air and in a .SOCC^-.IC^ mixture (by volume) is presented 
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in Figure 10. The radiative heating in the CO 2 -N 2 m i x ture is much 
greater than in air at the lower velocities; but, the results are com- 
parable at the higher velocities. The difference at the lower veloc- 
ities is due to the molecular band radiation from the red and violet 
bands of cynrogen, CN(R) and CN(V) , and the fourth positive band of 
carbon dioxide, CO (4+) , in the CO^-N^ mixture. The atomic species are 
dominant at the higher velocities, greater temperature behind the shock 
wave, and the radiation from the continuum and line transitions is great- 
er than from the molecular band systems. 

As the radiating gas flows around a body there are two effects which 
can influence the radiative heating to the body. The volume of radiating 
gas increases, increased shock stand-off distance, which will increase 
the radiative heating. This effect is offset by the decrease in temper- 
ature as the gas expands around the body. The distributions of radia- 
tive heating along spherically-capped, conical bodies for entry in an 
air atmosphere are presented in Figure 11 for different body angles. 

The distributions are nonsimilar and the nondimensional radiative heat- 
ing is greatest for the largest body angle. The shock stand-off dis- 
tances and temperatures at a location on the conical portion of the body 
are also presented. Both the temperature and shock stand-off distance 
are greater for the larger body angle; thus, the greater the radiative 
heating. Note that the dimensional, stagnation-point heating rate is 
insensitive to the downstream body angle for spherically-capped, conical 
bodies. These results are in agreement with the trends presented by 
Callis (3) and Olstad (4). 
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The effect of body angle on the nondimens ional, radiative heating 
distribution for entries to Venus is presented in Figure 12 for two 
entry conditions. As for air entry, the radiative heating rates along 
the conical region of the body are greater for the larger cone angle. 
Also, the stagnation-point, radiative heating rate is insensitive to 
the cone angle. As previously stated, the nondimens ional, radiative 
heating distribution is nonsimilar with respect to entry conditions. 

For the 60° body, the radiative heating rates along the downstream re- 
gion of the body exceed the stagnation-point value at the lower velocity 
entry. At the higher velocity entry, the radiative heating rate in- 
creases along the downstream region but does not exceed the stagnation- 
point value. 

The effect of nose radius on the nondimensional , radiative heating 
distributions for an entry in air is presented in Figure 13. The dis- 
tributions are slightly nonsimilar for the downstream region of the 
body. Callls (ref. 3) and Olstad (ref. 2) state the distributions to 
be nonsimilar and the present results are in agreement. However, the 
results of Callis and Olstad indicate a greater nonsimilarity than shown 
by the present results for an air entry. The reason is probably due to 
the radiation model used by Callis and Olstad which might be too trans- 
parent as previously discussed. In which case, the nose radius would 
have a greater effect than shown by the present results. Suttles (ref. 
89) states the distributions along the subsonic flow region of the body 
to be similar with respect to nose radius. The present results are in 
agreement with Suttles since the distributions are similar for the 
forward region of the body, s/Rn<0.4. 
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The effect of nose radius on the nondimensional, radiative heating 
distributions for entries to Venus is presented in Figure 14. The dis- 
tributions are slightly nonsimilar for the downstream region of the body 
for the lower velocity entry. However, the distributions are highly non- 
similar for the higher velocity entry. For both entries, the distribute 
tions are similar at the forward region of the body up to approximately 
the sphere-cone junction. 

The present results are based on a limited range of entry conditions 

and body shapes. This same situation applies to the studies by Callis 

(ref. 3), Olstad (ref. 2), and Suttles (ref. 89) for entries only in an 

air atmosphere. Based on the present results, the following trends seem 

to be generally prevalent. The nondimensional, radiative heating dis- 
R R 

tributions Q versus s/Rn) are nonsimilar with respect to entries 

in different atmospheres and with respect to entries in the same atmos- 
phere at different entry conditions. The distributions are also non- 
similar with respect to body angle and nose radius. Extreme caution 
should be exercised in attempting to extrapolate the results from known 
distributions to other entry conditions or body shapes for which solu* 
tions have not yet been obtained. For large body angles, the radiative 
heating rates to the downstream region of a body can exceed the stagna- 
tion point value for certain entry conditions. 

The exact composition of the Venusian atmosphere is unknown at 
present. The most recent data indicates the composition to be predomi- 
nately CO^ with up to 10 percent by volume of N^. The effect of gas 
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composition for C02 -N 2 m i xtures on the radiative heating to the stagna- 
tion-point of a body is presented in Figure 15 for two entry conditions. 
For the higher velocity entry, the radiative heating rate varies by only 
25 percent over the range of CC>2 content with the higher values occurring 
for the greater percentage of CO^. For the lower velocity entry, the 
radiative heating rate can vary by a factor of 6 over the range of CO^ 
content. This is due to the domination of radiation by the molecular 
band transitions of C0(4+) , CN(V), and CN(R) at the lower velocity. For 
the composition of present interest for Venusian entry (less than 10 
percent N^) , the effect of composition on the stagnation-point, radia- 
tive heating rate is negligible at the higher velocity; but, a 22 per- 
cent difference occurs with composition at the lower velocity. 

Fully-Coupled. Stagnation Point, Solutions for Earth Reentry 

The present method has been used to obtain fully-coupled solutions 
at the stagnation point of blunt bodies for Earth Reentry. The solutions 
are for mass injection at the wall of air and ablation products. The 
results from the present method are compared with the results given by 
Garrett (ref. 19). 

The solutions were obtained for the free-stream conditions and mass 
injection rates presented in Table II. These conditions are representa- 
tive of a manned spacecraft eeentering the Earth's atmosphere after ex- 
ploration of Mars. For the solutions, the wall conditions of the tem- 
perature and the rate and composition of the injected gas were prespeci- 
fied. This procedure was used to be consistent with the method of 
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Garrett, The results from the present method and the results given by 
Garrett are presented in Table II* 

The present results agree with the results of Garrett within 5 per- 
cent for the mass injection of ablation products and within 10 percent 
for the mass injection of air. This good agreement is better than has 
been previously shown in comparing any two methods (see ref, 19)* As 
shown by the results, the mass injection of ablation products is twice 
as effective as the mass injection of air in reducing the radiative heat- 
inging to the wall* The mass injection of ablation products reduced the 
radiative heating to the wall by 40 percent at the larger blowing rate. 

The present results for the temperature profile and the radiative 
flux profile through the gas layer for a solution are compared with the 
results of Garrett in Figure 16. The specified conditions are given in 
Figure 16(a) and the temperature profile and radiative flux profile are 
given in Figure 16(b) and 16(c), respectively. The present results are 
in good agreement with the results of Garrett. For the present solution, 
spectral distributions of radiative heating toward the wall due to con- 
tinuum processes and due to line processes are presented in Figures 16 
(d) and 16 (q) ) respectively . Spectral distributions were not given in the 
thesis by Garrett. 

For the continuum processes, practically all radiation beyond 11 eV 
is absorbed within the boundary layer and is attributed to the atomic 
species being at a lower temperature in the boundary layer than in the 
inviscid layer. There is a slight absorption of radiation within the 
boundary layer between the spectral range of 4 to 10 eV but the effect 
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is offset by increased radiation emission in the spectral range of 1 to 
4 eV, For the line processes, the radiation is sharply reduced in the 
spectral region of 7 to 11 eV, Part of this reduction for the line 
groups at 7.1, 8,4 and 9.4 eV is due to the absorption by the fourth 
positive band system of carbon monoxide, C0(4+) . The carbon monoxide is 
present in the boundary layer from the mass injection of ablation prod- 
ucts, The present results for the spectral regions of absorption, or 
increased emission, within the boundary layer are in agreement with the 
results given in reference 28. 

The good agreement of the present results with those given by 
Garrett (ref, 19) shows that the present method for a fully-coupled solu- 
tion with ablation product effect provides a good solution at the stag- 
nation point of a blunt body for Earth reentry. The method by Garrett 
can only be used at the stagnation point of a blunt body and has not 
been used for entries in atmospheres other than air. 

Fully-Coupled Solutions for Venusian Entry 

The present method was used to obtain solutions at typical condi- 
tions for unmanned, scientific probes during Venusian entry. One mission 
currently under study is a multi-probe entry with one large probe and 
three small probes which are spherically-capped, conical bodies. A 
description of this type of mission is presented in references 61 to 64. 
The entry probes are released from a spacecraft and are targeted to 


different locations on Venus. 



The entry parameters and body shapes listed below were used to 
calculate nominal trajectories for use in the present analysis . The 
only small probe considered herein is the one entering at the steepest 
entry angle. 



Large Probe 

Small Probe 

Entry velocity, km/s 

11.06 

11.06 

Entry angle, degrees 

-42 

-56 

W/C d A, kg/m 2 

78.5 

125.7 

Weight, kg 

158.8 

22.7 

Nose radius m 

.3429 

.1397 

Body half-angle, degrees 

60 

45 

Base diameter, m 

1.3716 

.4064 


The atmospheric model used for the Venusian atmosphere is that presented 
in reference 62 and the gas composition is 97 percent carbon dioxide and 
3 percent nitrogen by volume. The calculated entry trajectories are 
presented in Figure 17. 

The radiative heating rates at the stagnation point of the bodies 
were calculated along the trajectories to determine the location of peak 
radiative heating. The M s tagnation-point" version of the developed, 
radiating inviscid flow program was used for these calculations. The 
results are presented in Figure 18 for the large and small probes. Even 
though the nose radius is smaller, the radiative heating to the small 
probe is greater due to the deeper penetration in the denser regions of 
the atmosphere at higher velocities. Solutions for the radiating, in- 
viscid flow around the bodies were then obtained at the peak heating 
conditions and the stagnation-point values of radiative heating rates 
from these solutions are also presented in Figure 18. It is at these 
conditions for peak radiating heating that fully-coupled solutions with 
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ablation product effects were obtained for the radiating gas flow around 
the large and small probes. Hereafter, the solutions are referred to as 
large and small probes. 

The ablation of the heatshield for the fully-coupled solution is 
represented by steady-state ablation of a carbon-phenolic material with 
elemental mass fractions of carbon, 0.851; oxygen, 0.110; hydrogen, 
0.035; and nitrogen, 0.004. The ablation rates are solved for as part 
of the fully-coupled solution and are not prespecified. 

The results from the fully-coupled solutions for the large and 
small probes are presented in Figures 19 and 20, respectively. The dis- 
tribution along the body of radiative heating, convective heating, abla- 
tion rate, aerodynamic shear, and momentum thickness Reynolds number are 
presented. The spectral distribution of radiative heat flux due to 
continuum processes is also presented for two body locations. 

For the large probe, the ablation rate decreases along the body in 
the nose region and reaches a nearly constant value along the afterbody 
(Figure 19(d)). As shown in Figure 19(c), the convective heating rate 
decreases along the afterbody but the radiative heating rate increases 
to values which exceed the stagnation-point value. The radiative heat- 
ing to the wall is greater than the convective heating along the entire 
body. The total heating rate, radiative plus convective, along the 
afterbody is 30 to 40 percent less than the stagnation-point value. 

Thus, the decrease in convective heating rate along the afterbody ne- 
gates the effect of the increase in radiative heating rate. The wall 
temperature resulting from the steady-state ablation is 3600°K, within 
2 percent, along the body. 
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For the small probe, there Is a decrease in the ablation rate along 
the afterbody (Figure 20(d)) and both the convective and radiative heat- 
ing rates decrease along the afterbody (Figure 20(c)). The convective 
heating rate is greater than the radiative heating rate along the entire 
body. This result is opposite to the result obtained for the large 
probe. The total heating rate along the afterbody of the small probe 
is 40 to 60 percent less than the stagnation-point value. The wall 
temperature resulting from the steady-state ablation is 3700°K, within 
2 percent, along the body. 

The radiative heating rates from inviscid, radiating solutions are 
compared with the results for the fully-coupled solutions with steady- 
state ablation in Figures 19(b) and 20(b) for the large and small probes, 
respectively. The radiative heating rates from the fully-coupled solu- 
tions are less than the values from the inviscid, radiating solutions 
by 9 and 17 percent, respectively, for the large and small probes at 
the stagnation point of the bodies. These percent reductions are nearly 
constant along the bodies. The reduction in radiative heating is due 
to absorption of radiation within the boundary layer. 

Spectral distributions of radiative heating toward the body due to 
continuum processes are presented in Figures 19(g) and 20(g), respective- 
ly, for the large and small probes. The spectral distributions are pre- 
sented for the stagnation point and an afterbody location. As shown by 
the results, the absorption of radiation within the boundary layer 
occurs in the spectral range of 5 to 10 eV and is due to self absorption 
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of the fourth positive band system of carbon monoxide, C0(4+). At the 
stagnation point of the small probe there is a slight increase in radi- 
ative heating within the boundary layer at 2.5 eV and is due to the 
Swan band system of diatomic carbon, C^(S). A similar effect was noted 
at the other body locations for both the large and small probes , but the 
effect was too small to be presented in the figures. The radiative 
heating due to line processes was less than ten percent of the total 
radiative heating at these entry conditions and spectral distributions 
are not presented. 

The fully-coupled solutions assumed laminar flow in the boundary 
layer. Shown in Figures 19(f) and 20(f) are the distributions of mo- 
mentum thickness Reynolds number around the bodies. If the critical 
value for transition to turbulent flow is about 200, then the boundary 
layer would be turbulent along the afterbody for both the large and 
small probes. This could have an appreciable effect on the distribution 
of convective heating, ablation rate, and aerodynamic shear. 

A fully-coupled solution for the large probe with a turbulent 
boundary layer was obtained and the results are compared with the lami- 
nar case in Figure 21. A critical value of 200 for the momentum thick- 
ness Reynolds number was used for transition to turbulent flow. As 
expected, the convective heating rates, ablation rates, and aerodynamic 
shears increased with transition to turbulent flow. The distribution 
along the body of radiative heating was essentially the same for both 
laminar and turbulent flow; thus, the turbulent boundary layer did not 
appear to further attenuate the radiative heating even though the 
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boundary- layer thickness was 80 percent greater than for laminar flow* 
This phenomenon can be explained with the wall spectral distributions 
presented in Figure 21(d) for the turbulent and laminar solutions. For 
the turbulent boundary layer, there is an increase in the self absorp- 
tion of the CO (4+) band system in the spectral range of 5 to 8 eV but 
this effect is offset by an increased emission of the band system 

at 2.5 eV and the red band system of cynrogen, CN(R) , at .6 to 2 eV. 

The spectral distribution at the boundary layer edge is essentially the 
same for both the turbulent and laminar boundary layers and was presen- 
ted in Figure 19(g). While the radiative heating rates along the after- 
body of the large probe are the same for a turbulent or a laminar boun- 
dary layer, the wall spectral distribution of the radiation is different 
for the two cases. It should not be inferred that the radiative heating 
to the body will be the same for a laminar or turbulent boundary layer 
for other entry conditions or body shapes. 

A fully-coupled solution was obtained for free-stream conditions 
representative of a higher entry velocity than the nominal trajectories 
and the results are presented in Figure 22. The free-stream conditions 
and body shape are given in Figure 22(a) . The body shape is the same 
as the large probe except the nose radius is slightly smaller. Here* 
after, this case is referred to as the high velocity entry. 

As shown in Figure 22(c) , the radiative heating rate is greater 
than the convective heating rate along the entire body. Unlike the 
large probe, there is only a slight increase in the radiative heating 
along the afterbody. The convective heating rate at the stagnation 
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point is slightly less than the values just downstream of the stagnation 
point and is due to an increased effect of blockage of convective heat- 
ing by the mass injection of the ablation products. As shown in Figure 
22(d), the ablation rate decreases along the body in the nose region. 

The ablation rate and total heating rate are nearly constant along the 
afterbody. The wall temperature resulting from the steady-state abla- 
tion is 3750°K, within 1 percent, along the body. 

There is significant absorption of radiation within the boundary 
layer for the high velocity entry as shown by a comparison of results 
between the fully-coupled solution and an inviscid, radiating solution 
in Figure 22(b). The reduction in radiative heating rate is 25 percent 
at the stagnation point and 25 to 30 percent along the afterbody. Spec- 
tral distributions of radiative heating toward the body due to continuum 
processes are presented in Figure 22(g) for the stagnation point and an 
afterbody location. For the continuum processes, most of the absorption 
within the boundary layer occurs in the spectral region of 5 to 10 eV 
and is due mainly to self absorption of the C0(4+) band. There is an 
increase in radiative flux at 2.5 eV and is due to the C 2 (S) band. At 
the stagnation point there is absorption at photon energies greater than 
10 eV and this absorption is attributed to atomic species within the 
cooler regions of the boundary layer. There is also absorption at the 
photoionization edge of carbon at 8.5 eV. 

The radiative flux due to line processes is 50 percent of the total 
radiative flux at the nose region of the body and decreases to only 20 
percent along the afterbody. Spectral distributions of the radiative 
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heating due to line processes for two locations at the nose region are 
presented in Figure 22(h). Absorption of line radiation within the 
boundary layer occurs only for the line groups in the ultraviolet at 
7.1, 8.4, and 9.4 eV. The line radiation in the visible and infrared 
regions of the spectral, less than 2 eV, is not attenuated within the 
boundary layer. 

The present results have shown that the radiative heating toward 
the body is attenuated in the boundary layer for Venusian entries* This 
attenuation will reduce the radiative heating to the body by 10 to 20 
percent at entry conditions and body shapes which are presently consid- 
ered as nominal. The reduction can be as large as 30 percent at higher 
velocity entries. The radiative heating toward the body is attenuated 
in the boundary layer at the downstream region of the body as well as 
at the stagnation point of the body. 



SUMMARY AND CONCLUSIONS 


A method is presented for the solution of the fully-coupled, nongray 
radiating gas flow about an ablating, planetary entry body. The solu- 
tion is for a gas in chemical equilibrium and arbitrary gas mixtures 
can be considered. The treatment of radiation accounts for molecular 
band, continuum, and atomic line transitions with a detailed frequency 
dependence of the absorption coefficient. The ablation of the entry 
body is solved as part of the solution for a steady-state ablation 
process* 

Application of the developed method is shown by results at typical 
conditions for unmanned, scientific probes during entry to Venus. The 
radiative heating toward the body is attenuated in the boundary layer 
for Venusian entries. This attenuation will reduce the radiative heat- 
ing to the body by 10 to 20 percent at entry conditions and body shapes 
which are presently considered as nominal. The reduction can be as 
large as 30 percent at higher velocity entries. The attenuation of ra- 
diation within the boundary layer is primarily due to the self absorp- 
tion of the fourth positive band system of carbon monoxide, C0(4+), in 
the radiation spectral region of 5 to 10 eV. At high velocity entry, 
the attenuation of radiation also occurs for line transitions in the 
radiation spectral region of 7 to 10 eV. 

Prior studies of fully-coupled solutions with ablation product 
effects have been for the stagnation point of a body for Earth reentry 
and have shown that the boundary layer with injection of ablation prod- 
ucts is effective in reducing the radiative heating to the body. The 
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present results show that the boundary layer over an ablating body will 
reduce the radiative heating to the body for entries to Venus- Further- 
more, the attenuation of radiation within the boundary layer occurs at 
downstream regions of the body as well as the stagnation point of the 
body . 

Present results from a study of the radiating, inviscid flow about 

spherically-capped, conical bodies during planetary entries show that 

R R 

the nondimens ional, radiative heating distributions (q^/q^ ^ versus 
s/Rn) to be nonsimilar with respect to entries in different atmospheres 
and with respect to entries in the same atmosphere at different entry 
conditions. The distributions are also nonsimilar with respect to nose 
radius and downstream body angle, Therefore, extreme caution should be 
exercised in attempting to extrapolate the results from known distribu- 
tions to other entry conditions for which solutions have not yet been 
obtained- The radiative heating rates to the downstream region of the 
body can exceed the stagnation-point value for certain entry conditions 
and body shapes. 
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EXTENSION OF PRESENT RESEARCH 

An immediate extension of the present research can be made in the 
following areas: 

1. Additional fully-coupled solutions are needed for a better 
evaluation of the thermal environment for Venusian entries. Solutions 
with a turbulent boundary layer are needed for the small probe and for 
higher velocity entries. 

2. Solutions are needed for body shapes other than spherically- 
capped, conical bodies for Venusian entries. Future design may dictate 
a different shape and the results would be useful in evaluating the 
effects of such a change in shape. 

3. A study is needed for the effect of composition for CO^-N^ 
mixtures on the radiative heating distribution along a body for Venusian 
entries . 

4. Use the present results and results from additional solutions 
to develop correlations which can be easily used in parametric design 
studies for Venusian entries. 

5. The present computational method needs to be extended to include 
a transient ablation analysis. 

6. Use the present method to begin studies of entries to Saturn. 
Saturn is characteristic of the giant planets (Jupiter, Saturn, Uranus, 
and Neptune) and probably will be the first chosen for exploration by 
entry probes. 
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TABLE I. - STAGNATION-POINT, RADIATIVE HEATING 
RATES FOR AIR ENTRY. 

V - 14.55 km/s 

CO 

P m * 2,252 X 10 4 kg/m^ 
p = 16.16 N/m^ 

* OD 


Method 

R 

%? yO 9 

MW/m 2 

Rn = .3427 m 

Rn = 3.427 m 

Present method 

16.17 

28.80 

Callis, Ref. 3 

18.71 

45.47 

Suttles, Ref. 89 

18.38 

27.26 

Falanga and Sullivan, Ref. 73 

18.73 

28.44 
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TABLE II. - RESULTS FROM FULLY-COUPLED, STAGNATION-POINT 
SOLUTIONS WITH MASS INJECTION FOR AIR ENTRIES. 


(a) V = 15.25 km/s ; p = 2.72 x 10 ^ kg/m 3 ; p =17.76 N/m 2 

00 oo w 4 oo 

Rn = 3.048 m ; T = 3600° K 
w 


Injected gas 

R 

Vo’ 

MW/m 2 

2 

(pv) , kg/m -s 
w 

Composition 

Present method 

Garrett, Ref. 19 

0 

- 

3980 

4150 

.415 

air 

3375 

3740 

.830 

air 

3090 

3490 

.415 

ablation products* 

2870 

2770 

.830 

ablation products* 

2560 

2460 


* K c =.9207; K Q =.0491; K^.0216; ^=.0086 


(b) V = 15.25 km/s ; p = 1.77 x 10 ^ kg/m 3 ; p = 12.26 N/m 2 

oo oo ' co 

Rn = 2.56 m ; T = 3840° K 
w 


Injected gas 

R 

^, 0 ’ 

HW/m 2 

2 

(pv) w , kg/m -s 

Composition 

Present method 

Garrett, Ref« 19 

0 

- 

2307 

2540 

.205 . 

ablation products* 

1710 

1620 


* K c =.923; K q =.058; ^=.018; ^=.001 


t 








Figure 2. - Calculation procedure for the fully-coupled 
radiating, flow field solution. 
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Shock 



Coordinates 

s - Distance along body surface from axis of symmetry, 
y - Distance perpendicular to body surface. 

<f> - Angle measured in plane normal to axis of symmetry. 


Figure 3- - FI ov field coordinate system for axi symmetric blunt body. 



- Typical nodal point 


Figure 4. - Schematic of use of unsteady characteristics 


at shock wave. 
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Gas composition by volume 
.79 N 2 - .21 0 2 (air) 

= 12.192 km/s 

= 3.15 x 10 _it kg/m 3 

= 22.6 N/m 2 

h m = 0.0 J/kg 

Rn = 2.0 m 

e c = ko° 


(a) Free-stream conditions and body shape. 


Figure 5. - Nonradiating, inviscid flow solution around a 
blunt body. Present method is compared with 
the method of Inouye et al. { ref. 88). 
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z/Rn 


(c) Shock shape at downstream region of body. 


Figure 5< - Continued. 
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A 



Gas composition by volume 
.T9 N 2 - .21 0 2 (air) 

V = 12.20 km/s 

P w = 2.74 x 10 ~ h kg/m 3 

p = 20.0 N/m 2 
= 0.0 J/kg 
Rn = 0.20 m 
6 C = 60° 

(a) Free-stream conditions and body shape. 


Figure 6. - Radiating, inviscid flow solution about a blunt 
body during Earth reentry. Present method is 
compared with the method of Callis (ref. 3). 











Gas composition by volume 
•79 N 2 - .21 0 2 (air) 

= 11.19 km/s 

P ro = 2.717 x 10 ^ kg/m^ 

= 27.53 N/m 2 


Callis, Ref. 7 


Present method 


- Stagnation-point, radiative heating rates in an air 
atmosphere as a function of nose radius. Present 
results are compared with the method of Callis (ref. 7) 







Gas Composition 


.79 N 2 - .21 0 2 

.85 H 2 - .15 He 

.90 co 2 - .10 n 2 

.90 C0 2 - .10 H 2 


h M , MJ/kg 

Vo- MW/ ” 2 

0 

0 

-8.43 

-8.43 

5.78 

9668.00 

4.44 

35-70 


by volume 


Rn = .3048 
9 C = 60° 


V — 


D 

~ B 


Radiative heating distributions along a spherically-capped, 
conical body from radiating, inviscid flow solutions for 
entries in different atmospheres and different free-stream 
conditions . 





























p =117.3 N/in' 

oo 


sating along 
Les for entry 
s ) gas mixture . 












1 2 3 k 5 


s/Rn 

11.175 km/s ; p m = 2.850 x 10 -3 kg/m 3 ; = 117.3 N/m 2 

-8.43 MJ/kg ; 0 C = 60° 


Figure l4. - Concluded. 




Gas composition by volume 
•79 N 2 - .21 0 2 (air) 

V m = 15.250 km/ s 

= 1.77 x 10 kg/flT 

Poo = 12.3 N/m 2 

h^ = 0.0 J/kg 

Rn = 2.56 m 


Specified wall conditions 

T = 38^0 °K 
w 

(pv) = .205 kg/m 2 -s 
w 

Elemental mass fractions of 
injected gas: 

Carbon .923 

Oxygen .058 

Hydrogen . 0l8 
Nitrogen . 001 


(a) Free-stream conditions 


and specified vail conditions. 


Figure 16. - Fully-coupled, stagnation-point solution for 
Earth reentry. Present method is compared 
with the method of Garrett (ref. 19 ). 
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i 6 x io 3 



(b) Temperature profile through layer. 


Figure l6. - Continued. 
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(c) Radiative heating profile through layer. 


Figure 1 6 . - Continued. 



, MW/m -eV 


5 


k 


3 


2 


1 



Photon energy {h*v)» eV 

(d) Spectral distribution of radiative heating 
toward the body due to continuum processes. 

Figure 1 6 . - Continued. 
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Altitude 



Figure 17 • - Trajectories for large and small probes during 
entry to Venus. 
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V , km/s 
00 * 


Figure 18. - Stagnation-point, radiative heating rates along 
entry trajectories for large and small probes. 
Results from radiating, inviscid flow solutions. 
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Gas composition by volume 
.97 C0 2 - .03 N 2 

V = 8.803 km/s 

CO 

P W = 5.79 X 10~ 3 kg/m 3 
p =200.1 N/m 2 
h = -8.86 MJ/kg 
Rn = 0.3429 m 
0 C = 60° 



(a) Free-stream conditions and body shape. 






(b) Comparison of radiative heating. 


Figure 19- - Fully-coupled, radiating flow solution with 
steady-state ablation of carbon-phenolic 
heatshield for large probe. 
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(e) Aerodynamic shear distribution. 



(f) Momentum thickness Reynolds number distribution. 


Figure 19. - Continued. 
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(g) Spectral distribution of radiative heating 
toward the body due to continuum processes. 


Figure 19 . - Concluded. 
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Gas composition by volume 
.97 C0 2 - .03 U 2 

V w = 9-331 km/s 

= 9.32 x 10 -3 kg/m 3 ... 

= 330.4 N/m 2 

h m = -8.86 MJ/kg 

Rn = 0.1397 m 

9 C = 45° 



(a) 


Free-stream conditions and body shape. 



Figure 20. - Fully- coupled, radiating flow solution with 
steady-state ablation of carbon-phenolic 
heatshield for small probe. 


\ 
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0 l -J I | i_ 

o 0.5 l.o 1.5 2.0 


-J 

2.5 


s/Rn 

(c) Radiative and convective heating distribution. 



Figure 20. - Continued. 
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(e) Aerodynamic shear distribution. 



(f) Momentum thickness Reynolds number distribution. 


Figure 20. - Continued. 
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(g) Spectral distribution of radiative heating 
toward the body due to continuum processes. 


Figure 20.- Concluded. 


kg/m 
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Gas composition 
.97 C0 2 - .0 

V = 11.175 km/s 

GO 

p, = 2.85 x 10“ 3 
Poo = 117.3 N/m 2 
h = -8.86 MJ/kg 
Rn = 0.3048 m 
e c = 60° 


(a) Free-stream conditions and body shape. 




Figure 22. - Fully-coupled, radiating flow solution with 
steady-state ablation of carbon-phenolic 
heatshield for high velocity entry. 
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(s) Spectral distribution of radiative heatine 
toward the body due to continuum processed 


Figure 22. - Continued. 
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APPENDIX A 

UNSTEADY CHARACTERISTICS SOLUTION 

A quasi, one-dimensional unsteady characteristics solution is used 
for the shock points in the radiating, inviscid flow field solution. 

The present method for this solution is similar to the methods given by 
Call is (ref. 7) an d by Moretti and Abbett (ref. 6). A brief development 
of the equations is given below and further details are available in the 
above mentioned reports. 

In the analysis, the pertinent quantities considered are the normal, 
component of the velocity and the Y-coordinate. Since the tangential 
velocity is unchanged across a shock wave, the tangential velocity is 
not considered a pertinent quantity and the S-momentum equation is 
neglected. Consequentially, the equations for mass, Y-momentum, and 
energy are considered as quasi, one-dimensional equations modified by 
forcing terms on the RHS of the equations. The forcing terms are the 
terms in the equations which do not contain derivatives , which contain 
derivatives with respect to the S-coordinate , and which contain the 
tangential velocity. 

The mass equation (eq. 17) is written as 

p* + Ap* + j v y = C 1 (Al) 

where the asterisk refers to the natural logarithm of p that is 
differentiated. The Y-momentum equation (eq. 19) is written as 
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In the inviscid flow field analysis, the mass equation in terms of 
density and the energy equation in terms of enthalpy were combined to 
form a new equation in terms of pressure. This combined equation re- 
placed the mass equation; however, in the characteristics development, 
the combined equation is used for the energy equation. Thus, the energy 
equation (eq. 30) is written as 


pP 

P T * AP Y + V Y * °3 

The forcing terms are 

°1 ■ - (l p s - f “y * X u s * f ) 
c 2 = -(l' r s- E ) 

c 3 * - [l *3 ♦ P 3 "S + C) - fjp - P 3 Bu y] 


(A3) 

(AM 
(A5) 
(A 6) 


The forcing terms are considered as known quantities and the character- 
istics equations and the compatibility equations are solved for by 
standard procedure. 

The differential relations for the variables p, p, and v of the 
independent variables Y and T are 

p* dT + p* dY = dp* (AT) 

v,p dT + v Y dY = dv (A8) 

(A9) 


P T dT + p Y dY = dp 
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The equations A1 to A3 and AT to A9 written in matrix form are 



dT 

dY 

0 

0 

0 

0 


dp* 

0 

0 

dT 

dY 

0 

0 


dv 

0 

0 

0 

0 

dT 

dY 


dp 

1 

A 

0 

1 

6 

0 

0 


C 1 

0 

0 

v T 

A 

0 

1 

P 6 


C 2 

0 

0 

0 

pP 3 

a 

1 

A 


S 


(A10) 


The characteristics equations are found "by setting the associated co- 
efficient determinant equal to zero. 


The solution of 
equations are 


dT 

dY 

0 

0 

0 

0 



0 

0 

dT 

dY 

0 

o : 



0 

0 

C 

0 

dT 

dY 









= 0 

(All) 

1 

A 

0 

± 

<5 

0 

0 



0 

0 

V T 

A 

0 

1 

06 



0 

0 

0 

PP 3 

1 

A 






6 






equation All is a cubic in dY/dT and the characteristics 



(A12) 


dY 

dT 



(A13) 


Equation A12 is a trivial solution and is neglected. The compatibility 
equations are found by substituting a column of the associated coeffici- 
ent determinant by the RHS of equation A10 and the determinant is set 
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equal to zero. 


dT dY 0 

0 0 dT 

0 0 0 

1 A 0 

0 0 v T 

0 0 0 


dp* 0 
dv 0 
dp dT 

C 1 ° 

C 2 ° 
C„ 1 


0 

0 

dY 

0 

_1_ 

p6 

A 


= 0 


(AlU) 


The solution of equation AlU is 

/«. A ’\as + jL3E./’“. A \ c (Ai5) 

\dT A /dT p6 dT \ dT A ) C 2 p6 [ 

and substituting for 
are 

Ss. + 

dT “ 


dY 

— from equation A13, the compatibility equations 


c + _X_ 
p^ 7 dT 2 ‘ p^7 


(A16) 


From equations A13 and Al6, the right running characteristic is used in 
the solution for the shock points and the equations are 


— = a 

dT A 


5 

6 


+ .1 _ c 
dT p ^-dT C 2 



(A17) 


+ 


(A18) 
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APPENDIX B 

STAGNATION-POINT SOLUTION FOR RADIATING, 

INVISCID FLOW FIELD 

The equations for the radiating, inviscid flow field around an 
axi symmetric blunt body are reduced so that they are applicable for 
only a stagnation- point solution. Note, the equations presented in 
this section are not used for the stagnation point of the complete body 
solution but are used in a separate program when only a stagnation- 
point solution is required. 


The following conditions, from symmetry of the body, exist at the 
stagnation line. 


£ 

If 

O 

o 

u 

CO 

> 

o 

II 

an 


U y = 0 

h s = 0 

e = tt /2 

\ (Bl) 

I 

p s 55 0 

p s = ° 

II 

1 

With these conditions. 

the equations 

for mass, Y 

-momentum, and energy 


(eqs. 30, 19* and 20) become 
mass : 

% * - [ A % + P 3 (if "S + A + ^f) - -f^] (B2 > 

Y-momentum : 

V T = -(AVj + ip Y ) (S3) 

energy : 

br = ”( Ah Y “ p P T " p P Y + “p") 
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The equation for S-momentum (eq. 18) is degenerate at the stagnation 
line; but, by differentiation of equation 18 with respect to S and 
applying the symmetry conditions the following equation is obtained 


S-momentum: 

V = -( Au sy * I u s + 1 u s + F* p ss) 


(B5) 


The S derivative of the tangential velocity, u_, is used in the stag- 
nation-point solution rather than the tangential velocity. The parame- 
ters in the equations are 


A 6 6 fi T 


,R 1 R . 2 B 


F = 


6 ^Y + X * 


X = 1 + 6Y 


(b6) 


(BT) 

(B8) 


In order to solve the set of equation an expression is needed for p . 

SS 

An approximation for this parameter is taken from Newtonian theory 

P SS - -2 (B9) 

The characteristic equation and the compatibility equation for the 
unsteady characteristic solution at the shock location become 


dv 

dT 


+ 


dY 3 

dT A 


_L_ dp. = ^3_ 




Pr^ 


C 


3 


_ ■§£- p 

X *3 


(u s + v) 



(BIO) 

(Bll) 


where 


(B12) 
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The equations presented in this section are non-dimensionalized by 
the expression given in equation 14. Indeterminate terms were evaluated 
by the L' Hospital rule. 
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APPENDIX C 

COMPUTER PROGRAM FOR RADIATING, INVISCID 
FLOW FIELD SOLUTION 

A program listing and a description of inputs are given for the 
computer program developed for the radiating, inviscid flow field solu- 
tion. The program is written in FORTRAN IV language for CDC 6000 series 
computers. In order to run the program, all variables have to be initi- 
ally set to zero by means external to the program. A system subroutine 
called by a SETCORE control card is used for this external initialization 
for the computer system used in the present study. 

The inputs and printed outputs for a sample case are also given. 

The sample case is a radiating solution for a .97 COg - .03 Ng (by 
volume) gas composition. The body shape is a hemispherical nose, 

.3048 meter radius, with a 60° half-angle, conical afterbody. 
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CnNHON/lUtC0N/TK4»PK5,|INKS, HlPAt ,SIPRJt4HMS»CPFA$»CSPN1, LIFTS. 

DININSIQH Villi 
MANSION IOSH01 
OtHtNSfON CC( 1, 141 
0INFNJ10* CHll.ll 

0 1 KENS 1 0N IKSUUI.ITCgtSI.UtuMI 
bTWMIDd TftJKSflSI 

H4«EL I ST /N t*e 1/ YF ,PP .RHJ * , HF ,4 N, KV* ,4 \t ,T 

IUEIIST/N1NII/ T|H«t. KIC .CCI.UF. lit . UlMOtftl, [(WTI, ITC.IIC, 
11* W. ITCU, laciMKlt'L sc. CCS 
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ntL14(KS> * l./KI-IDELS4lKSI*0llS2lKSin 

49 CONTINUE 

14 I lKS.Nt.OI CO TO 4*92 

IU - a 

141 • 0 
111 • 0 
t»ul - 0. 

4* • I 

94 IS KS- I.KSI 
KOSISIM 

IFIKS-U 14, 14,11 

14 TH4TK-0, 

OPT* 111 - O. 

Till 1-14000. 

•p»fsin*i.« 

CALL 2gU(LlluJ$,|,9MMlM 
NfLJfll - YfL*.1449/T4 
tmlll - 9L2 

tMDII ,KYSI - IKMRM*l4.0l4449l/4mr 
OPLT4I1I - O.T4/tNQIl.KYS1 
io-tks 

NII.KYSl - 4M|4RS»4|N9,I/(VP«VT1 

9 1 (.KYI 1 - IHS»tAl)IM/UHOT*WIVFI 
Vli,iYS) • -YEL*CQK 1421*. 1640/ TP 
Ull.KTSl -0, 

4(1,1) - Hi I, ATI I * <m,KYll*YltiX(S)fl.l 

Pll.lJ - 9U.KYSI » I KWM I ■ RYS1*TI I ,KTS|»f1 1 , AYS 1/2. 1 

Utl,l> • 0. 

Tf 1,19 - 0. 

CO TO It 

15 TTII1 1 I.49YK1 , 

P4ES11I •P«S 

f Nf TK - I.STOY491 - THf TAIKSl 
CAU HUrilKOS'l'PItMIH 
vntmi ■ 

UMIW1 • 9A2 

MIKSfKVfl * 1H1PKSMI 44* 1/ 1 fP*Y4 1 

P(K*.KY*I > |PKS«ID1S29.P/1AM04«SP»VFI 

TIKS.KTSI • -TELTCOS ISA2I*. 3046/YF 

UUI.KT9I - m*MM<S*21*,$94«/VP 

PUS, II • Pd.lltCOStTMEfklKQSITHITRI 

>11«,U - H1M-l.lt*! IPIK9, It /PUS- 1,1 1 l*t04H44| 

U1XS.II • SQKT1 2.0*1 HI 1, II-MIK*,)) M 

vus, it • 0. 

14 CMTlMJi 
(«1l*l> 0 


lit 

IT* 

144 


US 

l«» 

U» 


It* 

146 

1ST 


209 

210 
211 


211 
2 It 

21 T 
214 
214 
*20 
221 
222 
2*1 
224 
«1 
22* 
22T 
224 
*24 
1M 
211 
292 
<91 
294 
29* 

21t 

29T 

Z9> 

29* 

240 


*44 

29* 

294 

24Y 
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1A& 


oa i* 

rtns.m - riii.n * iiPus.KTU-Ptis.nuTiiYn 
NliS.RU • Kilts . 11 » IIKIKi.irSI-KUMIliriKVIl 
UiiS»KY» > Ults.ll • <IUIKS,RYEI-UIkS,II|*?IRT|> 

YiKS.cn 1 Vm.tTJ|*VUV) 

KHtKVi * lHIKS,Kr>«YF»Vf I /2524.4‘4AA 

pae*<rv» ■ <Mi] t iT|»tHnF*yMyr)/ton2S. 

CALL EMJlLUgi,«r r N!SUT|| 

IFCRY.EQ.il Umi>(Ctwt-|,|/(;tK$ 
hhi«y> . i i a*wi»K s 
tfti»ri - Iks 

•mo«k*,iti - iahirsaia.oisassi/phof 
T fRS.KYI # IRS/ TD 

5 I 1 15. KYI - 45|AM*AII4. 1*4 HI/ I VA PVT II 

kmkj.kh - SMHiHt.Mtiiusirts/wRSi/vF 
M1RS.RVI - MRS 

G) - (u'ks*rvi«uiis.«tm>i viis,im*vfRS.«vi i 

VAPIRS.kyI - SQilisii/yiKS.tn 
21 * lTKS*CSMS*4|**.1/|Yf*V»| 

P L [ IS ■ K Y I - 61/4 *HO(KS,«Tl»»» IIS.KYlHi |R S.RT 1 • I 4 L F RS- l.U 
LI COWTINUC 

IMKS.EI.1I CO TO 21 

c* - *»I1JI * IOCLTAIRSIACOSITkITMISII I 
Cl * *6(1$ |t«*1DrRS.IJ NICKS, II 
C2 . C2*tHOK«S,RYSI*UIRS.KYSI 

ci - icl • ai/(. 

CZ - ICI - fRSCKSItCOSITKft AHtSHII-2. 

DKtllKSI ■ RS4KS|4«Bt«SI/C t 

71 cniiTrwie 

OtlTATIlSI * g, 
i f i nqmd.i q . g i ea ro n 

DELTA - DCLTAlRitAtMMOD. 

CALL RADICAL 

OTCfRSI * UEPU LIaEOOOO. I /IPrv'FAvF*YF"VFt 
««l»R*l * I T| CPI 11*10000. 1/iAHnr «vr*YR*vf I 
OUtfMi * 0WCIA1I * IW.IISI 
oo i« nr.^KTs 

DPIIS.pv I>HPINI (NY invent ATM p iOoOO . 1 / 1 RHOP*Vf*VF*VK I 

0« (ts.if i • ■ if irmr i *il ert trtt *i imo . i / itHv»«MTmr i 
OMRS.KTJ. a*4RS.RV4-QNlRt.*U 
LI COmTInuF 

afttKS.n . iqriiks.zi-on'k*. iii/Pfivuii 

004*5. RYM • (MiAS.ATM-gulM.OSI I |/DELV2f«Yf I 
00 20 «V2.tYS| 

Witts, nrs . 1<MI*t.*T<i HI lFLT*<RTl<g*KS,*vn-|OfLYHlY!PON|Ri, 

i<v-itn*ticivsiiu 

20 CEWT1NUE 

IF US.Ct.S I 60 TO 24 
00 22 KVl.KYS 

61 • Km/il.O»l«ILl*»tKr |*0EI till! II 
giil.lYI * i 301 ] ,1 V I /Oft TA E Ilk I- I /. *ci*»*t 1 , KTI I 
7T EONTIIUC 

60 rn IS 

2* tONTIWF 

12 . CdSiTHfTAlRSlI 
DO 22 «.»«!, ITS 

A • HUM A (YLRT I AC7 1 

61 - K 1 * S I / ( 1 .0 • E K 4 R S 1 * V 1 K V k * 0 1 L 1 Af R $ 1 1 i 

3nus,«»l < IBOiKS.IYI/SHTLlKSII « llG|HU/im«i{i),iY|) 

22 CONTtnue 
2 » CftNTlNuf 
1* CDNTPNUF 

on 76 RW.RSFL 

QI - i-a , mrisiAonYAHLii 

SI *E0tL FA CRS * I L MOtLSUKSIHUlTlIRSM * I ML I1IRS) *OUTHR*-|» Y »A 
IOELMEKSI 

26 tkl T A(A 5 I a AT INI 51/61 1 

Rl a 1.0 * 1 AlAStlAOilYAIRIEII 

Sk ■ IM0ELSmsn*91LUUSIII MI)fLUinn«QELUlKl(-l|| - 
l Of E. Y * 1 K 52-2 1 1 AOCl SA I R Sf I 
IF Til* St I . HINT S|/6 1 1 
SAS2 CONTINUE 

a « vy 

C7 - «HOF 
ci * ci ac i 

64 . C1*CJ 
C) ■ C4*fl 
C6 « ID 
cr . ci/yo 

(t i M 
C9 A Cl/Cl 

ulETf 1A.AA0I Cl ,C2. Ct.CA.CS. CA.CTtCa.CV 
960 P0PKATI//7K, 14HP4P AK TIP S »0* Wl HfM | (M it < f Ml KM./TI . 
lAwyf -.112.5.** N/S./T1,. 

2&HRKIF *,F12.$,6H rc/rs./tr, 

JTHYfAWF A, Ell. S. IH j/nr.f/tl, 

Sl]RKHOt*Vf»VY •.tlf.S.SH *./„?,/ Tl, 

SISH«NCP*VMYF*YF ‘.fi2.*,*rt V/-2./H, 

6AHTJ ..MZ.A.2H l./TR, 

TLOHVFAYF/rS A.flltS. «W J/IR6-6I./TR. 

R4HRN >,F12.S.2H M./Tl, 
tlMlK/YF A. | | 2 . S. EH SI 

Y»1TE(6,«*SI PILi AYSl.PHfltl ,«VS1 ,K| ( t lT$l,?il,(T3 |,YI L.RYSI , 

|tf*f I.KVSI.SSI l.RYSI,Vtll,icYSI 

*6S FaRNAT|//ZXtAWIRNAL SHT1CK PAOYERTTFS - NfMrf) 1 A t NS I OMAL A , / TA . A» p f | su 
1«C ■•.F6.tr/ Tl. A02NSI TV '•,f6.2./TX.AtNlHALPT • • , F4, 4 , / M , »T 2 RPCR A 
Zrult -*,F6, !,/TA.AWELtXTYY - •, F6.4 , /?*, AKOLfCuVAP NT. **,F6.2,/tY 
5,*EM«0 *Y »./TR,aSOrI( VYLOtlYY -•.•4.4.///I 

KMTI|t,AiHt7l 
I CONTINUE 

I OUT - LOUT • 1 
iMtour-toutNi 
4S0 CONTINUE 
I OUT - a 

CPU OUTPUT f IRS, Ti LIT, ASF ,«?S> 

61k CONTENUI 

US - IRS * L 
DO TOO RSaI.iSF 

1L A (I .0 * fA.1 ASlADfLIAlKSlHATANIOFrAtRSM 

00 TOO RT-1.RY5 

62 ■ 1.0 ♦ |R|RSI*Yi«Y|»DCL»it«Sk> 

it • (yeas, «Y i - rYfiTi»nnTtn«sM - iuus.ryiavi«yi*«i/c 2I * 

tVMKS.KVTl/OCLTAIRil 
TAUIRS.KYI a OCLYL | RY > /& 1 
Si - DEL V2( KYI/O 

1 M6i.LT. TftlXKS.MI I 1 Aul A S ,KV I -Ci 

i 4uiKS,Rvi a rtutRS.RYi ati F ate 

TAUIRS.IYI • ABStTtUtRS.KYII 

too c dnt i nut 

taun. rtaik.ti 

DO Til K}.t.RSE 
TAUN51KSI . YAUIRStkl 
0(1 T tO *Y. l.RVS 

IFITAUlRS.KYIrLT.YAUASIKSM TAUNSi RS1-T AJE IS, A Y» 
na CONTI HUE 

1 FITAUASl AS I .IT. rtUAk TALiA.tAiJNSIRSI 
TU CONTINUE 

IFINCTS.Ea.Ok 60 TO 1 70 | 

DO L T 00 KS-l,RSf 
1 TOO f*WASlR5l • TAUR 
1T0| CONTINUE 

r*UT • taut * TAUN 
UHl.tl ■ g. 

VTTItll > D. 

Y) ■ MDELYMLIAYri.ni *IOCLT6lllAY(]t7) I AYt k,tl|«0tir«41» 


S2 - UT2.ll/S<2l 

•Tlltll - 'IYtlk.ll*VAIIfl] ARMOt 1. k 1A( E2.'A62T*SYS/GFL TAIlkJkl 
k * <0«U, 1 l/(A 1 1 I , I IANMOI L. 1 in 

am , li - (pi r t,n- oou, k i i/ahoi i , 1 1 

rmejt iiiii - EHin.ir.riPM i.ii-i i./flHOii,Tiii*pm,im/(PiiitiiA 
IYAI1. 11*9411, III 
00 11 1Y.2.KYS1 

S2 • U12,RT|/S17I 
IFlRY.Fa.AYSn (0 10 1101 
rs • tYIL.KTAll-Vi E,RYM/|YELVklATl 
Tt ■ 1P1 1. 1Y*1I*PE l .RYl >/DtlVl IRY) 

Y» - IIOCLYTkATI*Hlt,RYll -(ftt l T4( R Y I AH I ! ,1 V* 1 1 I **I1.RT+?H* 
IPilMIKTI 
60 TO 1I0E 
At 01 CONTtNUt 

Yl » EYE I.KY+I I »<DFLYA4ET| AVI | Of| YSIKVIAVi L.KT-I I II* 
IDELYS4KYI 

y« ■ |P1 k.RY‘1 IMOELYtlA YIAPI | , «r> 1-10(1 TMiT |APH F Kr-l 111* 
IDCLTXRVI 

ta • (-(OfLVTERYIANil.RYM *40ELY6t«V|ANlL.AY-m -HU.RY-2IIA 
lOKTKlYI 
A l 07 CONTINUE 

M "I VI 1,1 Yl- ( VC AVlAQfl (AT U 1 1 l/OCLTtl |> 

Cl » 1.0 A (A E1IAVEAY |AOtt TIE III 
UTE L.RVk - 0. 

VTIURYI A - [64* YS I - r »*/ 1 PH14 1,1V kAilfLT Ainu 

PT4 1.RVI . -<C»AT*» -j vtfl ,«YI*YAI 1,1V 1*117. APH04I, KYI Al7/cn* 

1 1 1*401 1 .AY I Arl/OIL TA( LI|A|7.wtll aahQi 1,ATI*Y(I,RY1/C1II> • 
21D0tL,KY|/CP|tk,KY| ANMin.RYMI 
HE 1 1 , ■ Y I ■ -ECiAYSI AllPYt 1,KTI*(6**VS|- QOt t.REll /KHOIl ,AYI » 
wmtlt.ITl . fMY( t ,Ar|.C |P| tl.«n-4 1 ./PFCI I.KYI I l*K>m,AY>H/ 

ItPlI 1,AYIAV|| l,lVIAV«r | .ATI > 

II CONTtWl 

DO 10 Rt*MSF 

ti - ri DtLYTi iiA«rts. m -iot( »*i u »vi i 1,2 ii avyks.si lAocLrai k i 

IFIIS.IO.KUI GO TO 1*1 

S2 A <U4AS»l.ti •IDCLMitSf AUC'S. Ill -tDELSllRSLAUIRS-ltllllA 
i oti is (Aii 

« • iM»s«i,n noau*Mmi«k,iii -(ntissiis>APi<s-i,iu»* 

IftCltSIOI 

ts * 4 Ht*s* i . 1 1 AfofisirKSkAHiYS.nl -intLi)i*siAMtii-i,iii)« 
I021SSUSF 
CO TO 2*1 
1*1 CONtlNUf 

SZ * (•I0E1SMKS1 AiilAStll l A(0tLS6|RS|AuriW,lkl -U(Rl-2 ,1 kl • 

ioh si ns i 

SA • 4-tOtLST(Kit Ulus, LI « • ( DC L Sil AST «P| R }-| , T I 1 -P I RW . 1 1 1 • 
IDHSMKSk 

SS A t-4 0EiSTmi*H(iS.t I I *4 DFLlttl KS I a Ml AS-I, 1)1 -Ht«j-2,lUa 

knnuusi 
2*1 CONTtNuf 

64 - (Runt AS, n*ui RS. kl ASI K« lHYTAitS II I /1B1KSI 
ilTfRS.lt > "4UERS, I l*S7 I - I St/P-fOEK*. Ill 

•tins. U - «. 

• ms, II . -fUtRttl MS*1 *1 TATRS, II AVAfYS, 1 l«M*H0l AS, L I « V I A 1 

ltHDEis.nArt/onEtiRSi i.cfcii mooiks. u/ipmas, i iarhoirs, m • 

HTTPS. l» • -lul H.lUVll ♦IPTIKS.1I/AH0IKS.1II .4 Ul AS, 1 I *Si/RH0l 
1*5.111 -140 1 14.1 l/RHdlKt.tl! 

• hot | * J , 1 1 A 4ATIKS , 1 |»f | Pi («S,n-4 I ./PH01 RS, |l I l«PT(RS,l 1 1)/| 

|Pl<R5,ll«**tKS,ll*V«flS.11l 

*0 CONTINUC 

00 101 AtAt.NSr 

on i«i tv»j,Kru 

iriRS.fO.Kltl SO m uoi 

« * rUIKSAl.AYl HOElltUliniUSiYTlI MHLimtl*UlR}-1,mi It 
IDfLSSlRSI 

S» - IY4KS«I,REI AlOUStfKSI-YlRS.ITII -lOU 5 HRS l*Yt RS-I ,RYI 1 1 • 
|D(L S-SCKSI 

It * <Pf*5*|.«V4 AfOfL 5i4* 4 !••! yS.MT 1 1 -f Ofl S » (*S 1 APE RJ-1 ,«Y| I !• 
Itltl SSI A SI 

SS • IH1RSA|,K«I ♦IQtltt|'5>*H(rs,KY|| - 4 OElSl [MS l*Kl R<-| ,«YII »• 
IDClfSI R|l 
611 TO 2141 
1141 CONMNUC 

t/ . 1-1(Rlfl|ll|*UUS.(Y)| >|f)f LS*ilSl*UlRS-l,«Y|| -VUW.KYIM 
10(111115) 

S> - I'lOfLSTiRStAVIKS.RTTl »l»tll61Rlt*V1«5-l.«VII -V(«S-t, RYU • 
TOILS! TKSt 

SA - 1-IOfL ST<KSI«*llS,Kn | Mflfl Sif RSI APfKS-l.RTM -PUS-2. RUt* 
lOllSflRIt 

is P 1-fOfLSTtRtl •HltSUYI 1 HOEllt|Kil*H(RS'|,KYI» - Ml * J - 2 , IT ) | • 
tOEL S*4K$I 
2LD1 CONTENUf 

IMlT.CQ.KYil) GO n 101 E 

«5 • «Y1K5.RY*U-URS,KYIk/D£LYllKY I 

¥* * rP|RI,AY*]|-P(R|,RYT1/DFLY11‘Tl 

R2 a IJOftvrUYlALHKS'RYM 'IDElY6fKY|t«liHSiKY>m AU I *S,*V*2 k »* 
nrmiiYi 

rs • TlBfLTMRU AHlRStKVM -t 0«|. Y6l Rt> ahirS.iyaII | <H|I5,KY»II>» 
lttlVtllTl 
60 TO 1012 
L4II CONTINUE 

Y2 * 1-IOtLmiYLAUTRS.RTti unFm<KYIH)llSiKY'|ll -UlRS.RY — 7tl* 
IDtLTIKYI 

*1 - 1 Vin.KVi I |Al(MLY*<RU*allS,iTl l-(DELT11Rrt«Y1RS.RV-l lit* 
lOtLYSiRU 

a« • 1P|«5.1V*UACDfLrAUri«»«RS,RYli-4nFlV3IRT»>PfR5,RY-LIMA 
lOtLTSlRYt 

TS A 4~<C4tTT(RYI«Ht AJ.RTIl •IOEIVBlRV|AHCA5,mV-lM -H|RS,tT-2)|» 

loritiiin 

1412 CONMNUf 

61a 1.0A(X4K||*YIRU*0CLTt(RS|l 
61* |,6«1 * IkSI AO fLTAlRSt I 

1 » RitRSl • l»IRY»*0flT11*SiicO5ITHFTA|«SIM 
61* 4T4tY>A42MAN'te TAfiSlM/Cl 

5 6* ITm.KY) -tYIRV1*0(LTtri«sn-lul M,YT|«Cll)/Dari|Kll 
iS- 4*H04RS I tYl*63l/OCLTA1«SI 

5t* I Innt RJ.aY I*U(K5,KYI>41K1THPTAIn4))/A)«| ( *HO<t 1, K Y l tyi KS.KVM 

!•( tKCRSt/OlMiCDll rneiAlKSI |/l||l 
JT» IR1K11 *LMRS,KVIPV4RS,KYtl/GI 
<5«' I K(R 5 1 *UT RI.R UPUfRS.RV 1 1 /G I 

umt,RT»--U66*Y||«(UIK5,Kf|A57/6ll-((CS*TAl/UMn4«S.lYl ARHQIRS, 
linn * li«/ttMOlKt,RD«6l n ♦ 6T| 
/TU4HtYtA-4|6i«Yll*lllfRS.lU*5S/CI>*fYi/taFLTArRj|Pa HOKKS.RTtll- 

*T (RS.R Yt**l E64*VA I AlU|RS,RU ASA/Gl t*M V61R3.RVI •Y6IKS,RYtl*URH0i 
U5,KYliU/4ll'IClaTll«1lNn(lt,KT|*Tlr()ftll|iSMr«6M-lOMKS,lYI/| 
EPUlS.KYltlNOili.KTm) 

HltRS ,>T»«-||6%«rsi*IUIRS,AU*SS/41>-lPTrKS.KY»/RtOlKS.RYtl-ICA*Y4 
t/«HOtRS,RTM-((UlRS,liVl*MI/iaHQ4RS.RYl*61k|«iaO(AS,lT) /PHOfKS. RY 

MOTI«S,RVk • (HtlRl.RYI A <|PllRS,KYI-M./RnQlRS,RVI»l*prUS,RT)t 
tl/1PlU|,RY|*VA| AS,R«kAVAlR),RTII 
141 CONTI NUl 

IFINOEL.ta.Ol 60 TO *240 
IMLSl tZ00.A104.MD0 
4204 CONTINUE 
JSTOP ■ • 
taum * rtuNsm 
CGI - UfOll.RVSt 
C62 - VI I, RYS> 

CDS * P4I.RY51 
C64 » HI I. ITS I 
CSS - OILlii It 
C66 • OfltATIll 


Mt 

1RT 

161 

w 

»»0 

1*1 

1*2 

3*1 

5*4 

5*4 

5*4 

»*T 

5*6 

H* 

440 

401 

*02 

405 

404 

405 

406 
»0T 

*w 
* 0 * 
410 
41 L 


414 

415 J 

416 

417 
411 
41* 

42 0 
*21 
422 
42 5 

424 

425 

426 
42 T 
420 
42* 

410 

411 
4U 
All 
ASA 
ASS 
4)4 
417 
4M 
AS* 

4 AO 
44k 
442 

445 
444 
A4S 

446 
44 T 
vt6 
*4* 

450 
• SI 
4S? 

AS 1 
4 SA 
ASS 
*»« 
4*7 
4*P 
AS* 

460 

461 

462 
441 
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i - o 

00 213 KT*Krsi'Kri 

1 ■ r*i 

ci » i.o * (<m*Y(KYi«D«LT*(tn 

*♦ “ iTi«Y»M)Eii»(mi^oCirAUi 

c«MfU ■ g* ♦ tvu i ,«y i/i>el y*( i H 

CM12,TI - I. l,«Y|«V4< l ,nr>| 

S2 • Ul?,KYMSt»> 

I«TIM> * I Ofll 1 ,»» | /f H( i.ayjyohoj t,«vn » Km **H 

’ CM4 

CONTINUE 
7)1 CON7 t INjF 

JST09 - JitO» • | 

(FI JSTOF.61,21 | 00 YO *to 
; n TO *75 
*70 A* . I 

*71 wKlT'M.t'31 kS.ias.jstof 

P* ?*? ,*5HQt A PRO-f-AT its 0(0 *01 COYVEPGE tu ,■ r 

25X. ‘SMOCK ITERATIONS -*,n» HEMTIO* 

C*Ll WTfOTI|«5,H0T.Uir,«T5» 

471 CONTJNUC 

oetijc . DEtT4iit « Mcu»<»iT*iiin*.5*riLiMi 

rFutt0F.eo.il CO to J * 

571 ■ <U* 9ELT4TI | M*JvT/ 

< 0S<9) 1 | 
tHETR - 0, 

etui • ri i.xvi i •«>•]. t 

FRtlln - 4 F(l. AYS I «R*C1F«YT*VF 1/101)29. 

C*tL fOUIL IKOS, J ,F«ES[| M 
VEUfll * m*.3MI/*F 
UIK11 - s±* 

CC7 - -Iv£l*. 5914/YF| * oEiTitd. 

C6I . JNMtKS-t 6.014*111 /NMOF 
CC1 . 'F'$»10m*.IS(Riaf*VMvf > 

C64 - ImPAJmtl. 1/IVFtiMt, 

2*0 CONTI NUf 

Ct - 1.4 ♦ l'((l)»DCLr«6l 

a:j:5! : 

;;; : 

*Y2 ■ ttti-TKTsiM/u.t-nmm 
c* - «(u«nn»riT>*(vii a «vsi. vr 

C* . KM 1,1 Kt7ll.ll •r«Vl*tCP||,;|.Cm) | | |M ,y 2 
> - 1CM) .3) KM 1,(1 •ISY/*1CHt 1 ,71-CMll.lll 1 1/> 

CP. I* ♦ ICMTlMNI- 1 C lMCfi)-C5n * • 

. CIO - ASM ICCT-Cll/COTJ 
7MCI0- -CtfOH 214,236.21% 

215 continue 

(FI jSTnP.tT.l 1 50 TO 23 * 

F*"7 * cw - M 
3T4t7 - nnrtTIll 
OELIATIII . l.2*OEtT«T<|t 
TFlDELMtm.FQ.O.I CO TO ,» i* 

GO TO 23V 

2ii onrsnn - ..002 

3D TO 210 
21* CflNT 1 MU( 

f**l - E«»2 
07*11 - 07112 
E**2 . CG2 - C9 
0T1T2 - ntLllMM 

Cn l ?S r }U * ° MTi ' » T «-07*n» I /liSM-MMM 

2M «Ui||| . DEL TIC 
«xo»m,*7$i ■ cat 
UXNl.KYSJ - 0, 
vam.urM - CC2 
»4|f I.AYSi - CC1 

M*m,svsi «■ cm 

<11 110 >5«2.*SE 

jsrni * 0 

TtUM ■ T*UN$H)| 

cc* - oei.ru AM 
:G6 • DElTAIUcSl 

| 2 .’o l ‘° * 

00 »*i ifivti.m 

1 ■ 1*1 

JFlKS.EO.ASn CO To 2200 

10ELS3|AST $#l '' ,T> * fD * 1 “" , ' , * , " ,5,,tV,, ' <Oei Wl»* 

60 TO 2201 

” W u*wrSm5S ,t “ MV,g ‘ f,<t,,n 'titKSE-i.Mi 

luonsifisJ ♦<D£Li*(Ksn6iri5sn,AY, l 

2701 COHMMljf 

(F(IY.EO.KIi) CO TO >210 

CO TO 2211 

?Z,0 i?KEC««SiM m, * UU * , “ n “ *IOfl.T*Urs,^,« t „ il , > . U ««.ATS-„ 
2111 CONtlWUE 

3t » 1.9 ♦ rKUS»«TfKV»*Of LTl(fttl) 

B : {SSa!t,aKJKRrs! u "- 

6* - 1«N0(KS,Ar|*l/Uj,AY|.StKirHFTA1KSM/ftl 6 (>HD(NS ... 

l*M«lKSJ/6lM(C0SfTHf»ir.s|iy«ni WNOI«i,« 1 KU5.AT! 

GS - *UlinmS.KTI«u«RS,AT|yci 

CHTl.tl ■ «J« ♦ 1 VA(mS,ky»/0CLTA(1<S|I 

CHCZ.II « I. / IM01KS *NV I *Y*IAS.KYI1 
Cl - '(UCKltlTlvlS/OllKS 

' tv4f,t5 «* T, * v * |, nt‘>r*M*K)iA».KYi652/cir 

205*721 

cmm.ip , ci * (eiKMiMii 
113 CONTINUE 
113 CONTINUE 

j stop - jsrop *1 

[FI J5TTJP.GT.III CO TO 171 

0117*0- del rtut 1 *ifCM«oeir«7ri(in*.i*T*iiN) 

01 - 1.0 * MM«S)*0«l7*ei 
IFIKS.C7.ZI CO TO no 
SI • I Of IT *G-~QELTi(ll 1*12. /ST2M 
GO TO 1M 

1*0 51 - l-IOfLSTUS,. DEL Tier +'lf>eiS 6 <K&l »OEl TA( K S - 1 1 T -OELTlUS-lH* 


521 

32* 

52T 


917 

910 

5*3 

5*9 

5*1 

1*2 

9*1 

M* 

1*5 


55* 

939 

956 

997 

IIS 


911 

542 

5*3 


1 I OtL TATJ <s>* 


97* 
971 
471 
971 
579 
5 M 


*41 

142 

191 


119 
611 
• 17 

*14 

620 

621 

122 

All 

*2* 

*25 

621 

127 

12* 

123 

634 

111 

612 

191 

ill 

119 

111 

637 

*)« 

*14 

HO 


645 

111 

117 

Ml 

4*4 

699 

491 

612 

613 

696 

6«» 


locisaiKSi 

**t nersusj * ir*Kiii/aj> 

lofifiriNiH + «.~w.«9..i W .fNmi.*..» 

SVl • la*T<SVl|«VF/.|M4 
|?H<?2|NSH», ^ l ^« > *C0«IT«TMM, n/ ll.M0etTiTIM.6*| H r 
^WIll". , i ,T,,TW1 I-9E1SUS I- 47 MICiMlUl 

Mill. T|«S,KTS1«70*| .4 
FMSIII . FI KS,KTSl«»fOr*YF*V3yj 01)29. 

C4LL fOU«L UOS.I. PtEStlM 
«ei2IKSI ■ VCL*.344«/W 
5*221X5 ( - UJ 
» IW * ■ **2 * 6CT4IHSI 

C62 . -<MlK«lOA**lU-.306l7Vri * oriTATixct 

C6t - yrt*iniic*w -f *.,o* e/¥ , 

cci - *M*KS*i*.oi»66i/xMor 

CCl • lni«|fl]M.I/llHDr*7F*VM 
CCI - <HtP9S*4L41.l/t«F»vn 
« - N9IKSI . IWlUCKOSirhETMRSn > 

Cl* 7AIHW7AIK3M 

b ; ■ajsss"' 

.B.r.jsf.’s.’s.'r," * 

C» * X(KS»*C»T*C07/S1 

; ' Cl ♦ 17*1X1 .ATS I /DEL 7 601 

CNIl.i* * 

Cl - -UCT*S3/GMK6 

1........ 

in r ■<**«». 1 » 

lv» - lllMUniMdi.t-VIlTim 

Cl * 7IXf.*YSll + ltT,Mv U W,yM_m |>€V5( „ ) 

?! * W T * l, ‘ ,ir,,|>l,,,, ’ , si-u«l.iiriiHi 

Cl • (CM2.il , CNfZ.ll * UFi*itNr2,2i-CM2, nni/z. 

c \! «!•»«■»- ic**(cc»-c3n z ’ 

C19 ■ 6*11 rcC7K«l/C«71 

rF1C|O..OOfl|| 511,331.115 

134 tONtTNue 

JFJiS70F.C7.il 40 f9 331 
1**2 • C« - Cl 
(JTatj . OdUMASI 
aflTATUti . I.2KWL117USI 
IfIDEL 74711(31. EC, 0.1 GO to 3)4 
CD in 139 

13* DtllsTlxSl ■ -.092 
30 70 153 
111 CONTINUE 

(■II • till 
01*71 . 0T*t2 
FM> • CH - Cl 
otlff . DdlUUSI 

ao“o T Ji9* * 0fAT2 ' I /<««*- W 4H, 

131 OfLTlfSIl - otuw 
• MONf r* 5.6731 • <ci 

JMJLlimi « £67 

V6MKS.XYSI * C« 

FSHX9.NYSI - c«5 

Mkl»K3,Rvsi . EC* 

190 C ON (J Nur 

« «1 IM.UE 

4H0J«S,ky*| * ltJJH|(| (| ( T „ 

* OS I I AI.KVS) 

VIKi.XVf) - 111(11,1111 
FIXlrKYEl ■ FOMAS, ATM 
I M, ATI I - MSIIAS.ATSI 
HI C1MTINW# 

a * *95 1 DEL 7*71 3*3 

CO 70 4304 

1100 CONttNLW 

OELntl II . 0, 

* 05 79 1 • I 
tv I « 77/. 3044 

tmftx * 0. 

77111 • 7| | .X 751*70*1,1 

F*fJfll - *1 l,*TS J *#NOF«rF*VF / 19 L374 

C*u tIUIL 1x43,1 ,2411111 I 

7H21U * muwim 

1*27(11 - U| 

VII.AYtl • -VTtlttl 
U(l,AY5l • 0. 

H90 COUMNUf * W»»M««*.|2tW4 W | 

30 IDT K3*2,«SI 

* 1ft <t T *i«3iKoi(rMet»t«ni 

Cl - *6(At1«*H0JAl,il«MIC), 1| 

OTt 101 FY«t,X«5 

1 !!!!!.* 

Cl - MMM01X5.N7IFUU1.N7I 

l1n*C>l*.9«0Ct72IKV»J ♦ SMRY.II 

ID* CONTINUE 

DFLIM1MI - 0. 

" * llF|R7SI*(44lK»»6C01ITHFt4lRSII >1*2 

... BBm 

00 ttf KS-2.N5EI 

Cl • 1.9 ♦ I XI RllFOfi T* JK5 1 1 

3tJggl\' m '' ' ,Wt ”" 5 ‘* 0 “ T * l «l* -‘«l»i«»*0ELT4IXf-MI1. 

IM WTUIJI - *IMltl/Sll 

ci - i, a ♦ iMKsei*oiir*(K3n 

■ET11K3EJ . AT ANf Sl/CI | 

H 103 xS B 2,Klff 
*05(91 - | 

171 - 77/. 104* 

trtETt . 1 . M 97341 - (ICUiai - iff AIKS) 
fttu - TJ AS,RY(l«TO*|.a «r*r«S1 

*mm . Mll,ir1|«RM7»VMVI/|0|]M 
CALL EQurUK05,|,F*C3llll 
7EL >1 MS) • 7CL*. >9*4/77 
5*23 J NS I . 3*2 

64NN* • Ill » BITIIASI 

'('!!**> c 7S | . -7(L2I XI I *C01 f CAM* 1 
^12***791 * 7f 1 J(K) I *S INIGAIINA) 

XNOIXS.aym . ■TMKIlU.OlMll/tNOF 

■« 

■ r U5,t«..ll 00 TO 49 OQ 

l* - *1 


641 

*62 

643 


643 

4T0 

*tl 

*72 

615 

671 

179 

171 

177 

179 

173 

6>a 


615 

6*1 

M7 


797 

708 

793 

719 


723 

724 

725 


m 

731 

731 

7)1 

719 


712 

Til 

m 

745 
716 
TIT 
Tit 
71 * 
7 W 


798 

733 

769 


T?8 

779 

740 


785 

TI6 

747 

741 
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UNITED. 41)01 

«ii» v»s switchc 

10 TO IUS5 BM-MCt 0I*T ION*, u 1 20 K, 10 M***99 *•*•«! 

CALL OUTPUT* I n$, ray* ,Klt,KY5l 
MOO CONTINUE 

00 10) KW.^St 

r«UH - T*uns*«s» 

00 10) tr-i.KYSi 
*H0kt<Ki, ii r» - nmoiks.ati 

UtMKS.KVI « UIKt.KTI 
Titut«m < y<Ki,i(i 
PBHKS.RY) - PfKS.KVI 

HkioiitiYi - hikI.kyi 

(HOIKS, KY) * »H0ltU1,tTI • * •M0T|*S,M1*T»UN \ 

U4Kt,m . u(HM,«T( ♦ lOMKS.AYlPTAUMI 
CtKS.KYI - VBllKS.KYl • <¥!(«). *T**T*0«l 
■I AS, KYI ■ PkltKt.KVI P <PT flc9,tTMTAUH| 

HMt.KYt » HO I ( AS , KYI * |H1CK),lV»»r«lM) 

io» cmti«ut 

Y1 • MtrtLYTI UMII.LH -1 OflYAf 1I*V{|,7) I 4»f I , 1 I I YOf LTi f If 
» ■ uti, ji/irn 

t* ■ -init,ii*«i(i,ti<MDii.i)»ii2.*u>ptn/&hriiitm 

1 » tOOIL. M/IPLI L, nPtMOl 1. nil 

t» ■ 4T4-oon.il 

T] (TO* 4 intl,LMl./»«ni l.nil*H)|/|P|M.tl*YM1.1l«TMl.m 
*H0m,n - iihotu,iimi)/4. 

MH,» - 

mtm.ii - tHtti.n+ni/f, 

DO 95 MY-2.KVlt 
JI - UIMVI/1UI 

t) - <vu,xr)>viM*-m/D(L(m«i 
»* - «PU,*Tt-Ml,|T-m/9tLMIUl 

»» * tHtl,ir»U*(KLTMItr|iHM.KTIMD(LVlUl|*H<l||IMI|»» 

IPIIIY.eo.il Y« * rttltHM/IPHf 1,211 M0ELT4tZI«H< 1, 111 •H(| 1 4I]I 
L0ELVOI2I 

iHn.M.iym tj ■i-iocirmri*«i||K«|t»ioHMun*m.nMn 

I-V||«lir-»|I0HT»|«TI 

IP4KY.I0.KYU1 r* 4t-infiTmTi»pii.MH*iWLWiii(i«*U|iY‘iii 
l-Pt LiKY-II 1«0(L YtfKri 

54 "(Yfl.KYi- I Yt*Vt*DfL t AT U * N/0EL7M 11 

01 « 1.0 - l*< 1 1 *Y(AY I *Df L Til | 1 1 

T) ■ -ISMTII -4 Y4/l«»a'LiKY>40ELtAl 111) 

f* - -404«TM -IYA1 1 .»yi*yai l,KV)*l 4 I.«hk}<I,kt i*tl/«ll* 

if rho( i,tTinWD(i,iktiMMT.>«iiin>in4i.iYiiiii|Rri;«iiii » 
irODfliKY|/<P1M,M4»*K]H,ier>M 
T) - -IO**Y*» *M 14*164*74 I -90M.YYJ 1/»HOtl.KVI» 

M ■ I T5*l tPI I I .KVl-f |. /4>,rt I l,Kt»1 1*1*1 I/I P|f |,<YI* 

i vi 1 1 i . ayi i 

*Hflft|,«Y| - I (NON | ,RYIM l I/?. 
v»n.*v» * i»Mi,«»i4»n/i, 

»ri4.IYI « fPTl l.KY|Pl4)/I. 

NT 4 1 » ATI ■ (HTf l.KYI* Hi/ ? . 

« CMIIRUI 

00 « KW.KSC 
IM«S.EQ.KSf» CD TO TMO 

5T - IIHKS*|,I| H0ELS*1«SJ*U(AS,||| - f Ml l»l t |>4Ut A)-l , 1 1 »| • 
tHLtlllll 

S4 ■ iMKMiii »n>tU4UtiHiii t m -iouiiiiii«Ti>w ( mi* 
IDFLSSIffSI 

S' * |RI«S*I,W *1 Minimal* S| 11 1 •4StltMlt)*Mllt-|illM* 
lOEt IMfSt 
CD TO 9&41 
4440 C OUT I HUE 

97 • l-fOElJT|HI*UH»,ll ( 

lOtilmii 

If - <-«KLSTtASJ*PlAS,lll 
IDILIIIKII 

» * <-toELsmi)«Ntiit,m 
IDCLMIKII 
TUI CONTTHUC 

YS - IIOMtTI ll«VIKS,||> -4 0flY4lll*Y4«|.7M •Y4Af.ll l*OtLYtl | I 
U • IftHOfKi, I turn, LJMIfT IWfTi, 1} || 1/tBfKS 1 
T 2 ■ -lultS, 11*11) ~ I t4/*«n<F5 , 1 1 ) 

74 • -(U1*5.W*S4) -I Y*(« S. II 11911 mull IS, | |»W I •< 

| RH 0 (« S , ilaYVDElrTMK ) l |» C 4>1 » 1 001 A 9 . 1 J /I * 1 4 » t , 1 1 MIMO ID , 1 1 M 
T) - -<UIKS.1I*S9| «l T*/4Mni«s,»|| HUM1, IHWAHOU9, 111 - 
1 I OOIKS.II /•HOtU.Ui 

T1 - tTS*l IMUJ.IM l./THKM.i II ) »T4 1 l/<m AS. I l«WH«S,1 1* 
ITKitSilil 

ftmTfK9.il « fKHOTtKS,11>Tl|/2. 

UTfK9.ll - IUT4U.1 J>T2l/7. 

PTtK9.ll • tP»4K$,l|PT4)/7, 

HttAS.II • tHTlKUl I + T4I//. 

44 tOUT I HUE 

do ioi (|>m;e 

DO 101 AT-Z.AYU 

IMKS.E4.R4El fia to ion 

41 * lul*S*l,KYI «-|QSLS4 4KM*UliS,RY> J * I PtL S >1 K! )*UtKl~l ,«Yl 1 )* 
tDCLSSUSI 

49 • f V(K5 » l.KY | -tftfL SllltS>*VtKS-l ,KT| 1 1» 

IMtlTlIU 

94 * tPIlSM.KTI ♦IDILJ*(»S|MHS,<»K ^DELllUSI*R<U-| t i(m> 
10(4.911 ■ St 

is • iHiifH.iTi »ioHS4Uiiwm,irii - 1 pelsii K s-i.Kvm* 
1DEU4U41 
CO TO 1012 
1021 CONTINUE 

SZ - 4-1DCL97IKSI *4I(K J, AY ) 1 •IE>flS4l tSJ*U(Kl-l,KV11 -U1«S-I,K?>t» 
lOfllltlSI 

I) • 1-4 DEI SttKSI »V|KS, Kill 
IQIL944K91 

94 - 4-4MIITIKSI RMKS.RYH 

10ILI41K9I 

99 - 1-T0ELST(KS|4H[KS.KYM ♦ 1 DEtS* US l»Ml «9- 4 ,kt 1 1 -HlKW. KY 1 1» 
1D(L$0IKS1 
IOt* CONTINUE 

»t * 1UIK9.KY*lJPlDEtY»1»U»U(KSiKT>J-’| OllTUKYI*UfKlpKY-ll 

1II*MLY9I«VI 

n • 1 VtKl»KT»'VIK9,KY-m/D|lY21KVl 

Y4 * (PtKS|«Yl-P|i4.«T-l»|/DtlT*fKY| 

*9 - <HlKStHV>ll»fOElT4fKYI*HlK9.KY| l-f OClTllK YIKMf K9*KV- 11 

III *061. Y9 1 KY J 

lMKY.e0.2l Y2 a tlDeiY7IZI«U1K9.ZII <(DtLUIll*Vlltilll 
L*U(K9,4)l«0HY«<tl 

tMKY.E0.2l Y9 ■ tt0(LYTI7MHlKS,7»i - 1 DCLT41 2 91 ) 

1.HIKS.4II *Df L Yif *1 

IFfKY.EO.KYSU Y9-t-ID*LTt r«YI*v4«S,KT|lHOf CY41 KT»*YI KS.KV- 1 1 1 
l*Y1K5,KY-2ll*0eiY»mY1 

lPfKT,Ea.KY9ll Y4-t-IOEt.YMKTI«MK9,HYll>lortV44KYI*MK9»KY>m 
l-PtKS t KY-2ll*0€l»«4KYl 
Gl- 1 .0»tKlK4>*Yf«YI«DCL t«| K4 1 1 

57- 1.0«(K|«U*0(i.TM KSI I 

* - Ft ft t K S J ♦ |YfKYl*DElT4tKSIKnS4ll«ET*1K9Ml 
5 9- I Yl KY J *C2«1 AN t KEY 44 «S 1 1 1/ai 

5*- 4 VI K9.KYI-T Y[KYI*0E1TIT(K9I )-IU<Kl*KY4*0)| l/CFt,fAf»9> 

59- 4 KHOI K9 • HY1*C3)/0ELTA4K4I 

S«- IKMO t K9.K YJ »ul K9 *KV 1 *9 TNf THEYAIKI I l/RI • 1 44U«)(K» t KV t«V4 K9«KV M 
lit IK 4 KS J /Cl I ♦ 4 cast THET4IKS I l/ai 1 I 
ftT- IK|KS1*U4KS|KY»*VIK4|KY1I /Cl 

58- 1KIXU«UlK$,Krt4U4K4,KY>t/Cl 

12 — 4 lfc4*Y2l»1U4K9|KY l*S7/Cn-1 f 04 YT4I / < AmtKS.KY l««H01Kl,tV 1 1 1 
L* 1 94/t RUOI K9. KV 1 *C1 1 1 * CM 

T )*— 9 |C4*T3 1« 4 U4K5 ,*Y 1*91/51 J * IY4/(0El TJ 1 KSI-KttOI •$ .KV) 1 1 - 00) 

T4— <IC4*T4l4<UtKS,KY 1*94/5 ll-t I YAIKS.R VI • YA4K9«KVI l*f 4 KHOf KS , kyi 


• I 0 T 4 S 4 I KSI • UtKl -| .|M - Oltl - I . m * 

M0KS4IK9)K»«K9-I.II1 •TUHilll* 


>tQ(lS*lK|ltNU)"|.llt <H|K|*I,|||# 


• 4 DtiTMfSnms - i.ini - v < Kt - tiK « i >* 

»10fll4|Ki>*MRS-t,«TM -lHW.nii* 


8 W 

*11 
■ 14 
419 

• 14 

• IT 
41* 

• 19 
■*« 
1*1 
•2* 
4*9 

• 24 

8*4 


• » 
491 
494 

• 99 
494 
•IT 
•94 
•19 

• 40 
441 
44t 
*41 
444 
■49 
•44 
•4T 
•M 
Mt 


IK 

•49 

• *4 
•44 
•94 

nt 

• M 

•49 


•49 

•TO 

»T1 

• 71 

• »* 

• 74 

■ T9 

174 

in 

«T« 

479 

•40 

«il 

•tz 

Ml 

444 

M9 

• 44 

■ •7 
44* 
949 
•90 


90* 

909 

904 


910 

911 

912 
411 
41A 
414 
41* 
• IT 
914 

919 

920 
9*1 
*22 
9*1 
9*4 
9Z9 


t*l!/«ll-f C9«T*1*(«HDIKS.<m »Y9/OB.TA4 KS> >PC4l »-<QD<«t.KYI /INI IKS. 
2 lYIPMDUlilTim 

T9— 4 4a44V«IHUCKl«*VIM9/Cll-'T4/*M]IKS,llVn-IC4+V4/*mtKS,lY|| 
I”) TWfKS.KYI •M1/4CH0I KS , «Y 1*01 1 1 M 001KS. KYI /RMOIKI .KYI II 
II • 119 * ((PltKl.KYI-fl . /RNflf KS. KY I tl8t411/fYllKS,KT|4VAIKS,KYI 
l«94(M*KTM 

•HOTtKS.KYl • («NOT<KS,RYlPTll/*. 

UT(KS»KY| • luT ItS.KT lPTII/7 . 

VT IK 9, KYI * tYT4Nt«KYI»T)l/Z. 

y| i K9.1YI - iRMUtinirti/}, 

HTl Kl.KYI - I HI IMS, KY |*T4|/|, 

10* CONTINUE 

DO 194 11*1,(11 

T«UN • T4UN9IK9I 
•0 109 IT*|,ItS| 

(HOIKS, NY) • tMOUKS.KYt • I KHT1T I KS ,KY l*T*UNI 
Ul K$ , KYI - UBKKS.KYI ♦ tUT|K9,KVi*TKUN| 

Yf K s i K Y I • YVI4K9.KV1 « I YTIKS.kY I •T« unl 
9IK1.KY1 - 44MKS.KYI ♦ lETIKS.KVlMAUM) 

*(«S'KY| - M9II«9.KV( ♦ tHTIKS f KY»4T*UN) 

109 CONTINUE 

tM IKC-IKSUi J91 1 TtT.IM.ru 
TOi tTt « ITCUIE9I 
l»C - INCUtJtl 
•9 • E 9 -i 
TOO CONTtNWC 

(T1 ■ m M 


INI > 


Etl 


IMm-ITII TI5.TI4.TI4 
714 IT| • 0 
714 CONTINUE 

iFitu-tm til, m t T|4 
719 ITI - 0 
141 - 0 
»14 CONTINUE 

IMIT1I T94. 790.4)9 
T90 CONTINUE 
IHItlit 
DO 4N0 K9-I.C9I 
OO *09 KT-l.tYl 

NNIKY1* IM|ll,lT)«N»YFI/im.UU 
MtUKYI- 4»IK|,(YI*tl(E*T7»N 1/1019*9. 

CALL (0tmiK«8.IY.4NC9«YM 
NHfKVl* 1 .•• MINI 
TEilitl * IKS 

• HOIKS. KYI - 1'l«IKt*U.0|JI44)IS4*«>E 
TINS. KYI - TKl/TO 

SKfKS.KYI - 4trNl|UkUJ*|Tt/(T7*TMI 
■NtCt.NYI - UNIS 

••I Kl.KYI « S0NM41t4.)4C*nilAT«l/Uf«t|/vr 
Cl ■ ILIIKI.KT t *Uf KS.KT) 1*1 VIKS.ICYI 4VIK t,K T) I 
YAM| I l.KY | - SMTI09I/YA1 Kl.KYI 
69 - 4tlS*CimUlU.I/<N*»| 

'i****** 1 • C1/INHDIK»,8Y|*U4 (KS.KTMVA Iff 9. KY 1 *t lint- 1 . 1 1 

•09 CON r INUE 

(MiNlUO.E0.9l CO TO 111 
t/UNIt 010.410.111 
410 CUNMNUE 

l«*Dt» - |«S 

Oft IN - DELTA IKS I MUR * 100,0 
CALL KAO I CAL 

OftlUl • tf tP 4 Ml« 10 tK».l/( 4 mE*VY*vFiVF| 

BN14K41 m KLCPT 1 141 0004. I/INHOE •YP-Y7*yE I 
OUTIKSJ - OMCtKSI a MltS) 

00 lift NY-1. MTS 

0 Y 4 KS . AVI * It # lNHKY |» nCNlKVI 1 A 10000 . I / If ) HoA - YF * YY»YP > 

9 N'KS.ff?|. 1 (MMtKY|»ntMKTM« 10004 ).l/l*l«f*Vf«fEvYM 

484 M. 1 TI* OPtKl.R VI -OMf M .kV| 

|M CONTINUE 

OOlKl.tl - 1 1 0 ELT 7 til AflNlKt .III -IO(kY 4 ll| 40 NlKl.*ll -ONfKS.Ul* 


924 

92T 

Til 

929 

9)0 

911 

91* 

99) 

9)4 

9)4 

9|4 

9)T 

9)9 

9)9 

940 

X 

9*2 4 
94) ; 
944 r 
949 , 

941 f 

947 

948 1 

949 i 
«« : 
•« 
992 
9») 
994 . 
999 j 


9*0 

941 

94* 

441 i 


• I «LY4IN YS 1 «ONIK S.ffYSl 1 1 


1 DEL VI 111 

QOIMltKVtl -I -I OCLVTl NTS 1 94NI Kl.KYI 1 1 
l-NIIIMn-II INHTIUTSI 
to no KY-r.Krsi 
• CHKS.KTI • t DNrKS,KY.llPtnELTA|MT|K«(K5,tYil-IOELY)(KTI«q 
iKY-i 1 1 1 *onmi»i 
120 CONTINUE 

TE1KS.CT.il 00 TO 1*« 
on ill KY-I.IYI 

01 - Kf 11/1 1.0*141 11* YtKYI-OlLtAf II II 
ODM.kYI • (OOtl.KVI/OCLTAdH * 1 1 .*ft| iQH[ 1, KY 1 1 
Ifl CONTINUE 
GO Tfl LIS 
1*4 CQNHHUt 

61 • njS| f MET 44 MSI t 

DO 1*2 RY«l,KYS 

1 • R 44*41 • <Y|AV|*G11 

Cl - 1 1 K 1 1 / ( 1 .OtlMKS l*V1 K Yl ADCIT 44 w s 1 1 I 

OOYKS.KVI - IWtAS.KVI/OUTAHSH * I4GI»IG2 /N|I*QN|KS t KYT1 

l*# cdnf i hue 
114 continue 
■II CONTIMWE 


*CC ♦ J 


IMWPU.ffi.O I IR1DCK - IKS 

i« Continue 

I f I INI- 1* SC I 14*, 941,049 
969 CINIT HUE 

Etc - 0 . 

DO J»l ki-i.ME 

CC1I, ESI * iHtM'i j-tci i.ksi i/cc r i , «lt 
ten. Alt • (HlKS.KYSI-CCIZ.KSII/CCIt.KSI 
CC49.KSI ■ fHIKf.KYCl-CCII.KSlI/CCll.KSl 
DO 1*9 | -1.1 

IM44UCCM.KSIJ.LC.CCI 1 
149 CONTINUE 

>to c dirt i me 

(CC - ACC/ ICC 1 
IftECC-CCPI 1T4.J79, ITT 
ITS CONTI NUt 

K • 1C » t 

IrilC-lCCl 141, Mo. MO 

980 continue 

IEMkADCK.E0.IKS1 60 TD 941 
IMCt • IK5-ICC 
IMIRiKK- Kl«i Mt. 941.141 
1M CONTINUE 
It - 0 

»«1 CONTINUE 

00 MI KS-t.KSC 
CCU, Kit - HIKS.il 
Ctlt.KS I • HIKl.KTSI 
CCfk.UI - iNKS.KYCl 
142 CONI nut 
140 CONTItKJF 

miKt-IKSEI 1901,1900,1900 
1900 CONTINUE 

CAU OUlPuTIIAS.TAuT ,ff)E ,KYS I 
PUNCH 9109, (aS.TkUf «(? t,lfft«T0»j9 
PUNCH 9904 , ISETAIKII. * W, <AM 
PUNCH 9004* 10EKT1IK1I, ks-I.ASEI 
PUNCH -9904. 4 DEL TAT t K S 1 , K$.|,KSEI 

OO 9940 A 5-1 ,KSf 
PO 99*0 KV-I.KYS 

PUNCH 9904, PUS. KVI.«H01KS, KY). HIKS, KYI, U1K5, KYI. NtffS.KVI, 
1YA1KS, KYI, Pitts. KYI. OOlffS. KYI 


949 

970 

9TI 

9T2 

9T1 

974 

ITS 

974 

9TT 


941 

941 

944 

919 

944 

n*T 


997 

99) 

994 

995 
994 
997 
994 
999 

1000 
1041 
14101 
1001 
L004 
1009 
1004 
100 7 

looa 

1009 

1010 
■ Oil 
1017 
lot ) 

l»|4 

1019 
14114 
1017 
1011 
IQ] 9 

toia 
1021 
IQt* 
|D{» 
10*4 
10*9 
1924 
1U7 
102 * ‘ 
1079 
I 01 Q 
10)1 
10)7 
LOST 
1014 
10)9 
ID] A 
14W7 
10)6 
10)9 

1040 

1041 

1042 
1049 
1044 
1049 
10*4 
104 7 
1044 
1049 
(DSD 
1091 
IDS* 
1099 
tO 9* 
1059 
LOM 
109T 
1099 
1099 
1040 




242 . 


14*0 CONTINUE 
SIDE 

1*01 CONTINUE 
60 TO 1 
961 CONTINUE 
INS - 'INS 

cm. OUTPUT (EftS.TAUT.KSE.RYS I 

Stop 

END 

r 

SUOROUTIW OUTPuT(lKS«TftUf,KSF,i¥S) 

Mil X 

coKHonysuTi/ Tf iii .s(iM,Niisi.niEiAnsi.Biua«>,Na<i9i. 

lOllTilhltMlUn IS), nr r 1 s I 

COMMON/ SUTl/ NWIISIll.UIIMll.TIMaihMIMtltHlIMlI, 

lmi.UMniT.MMiiiT.iii.MNnMii.Ninj.mtNM is. in, 

2T NUt Hi 1 1 1 

CCNNON/SOT*/ RH061I1S,1LI,J61 IlS.lll'VBHII.Ul.PBmS.ni, 

iHlIIIT.ID.lKUimi.KlWmi.OELtimMlAUlhttKLSMni. 

/QELTKt | i.OfItII I LI.OtiVlM 11. DELTA! ID .DELYSl III 
CON NON/ SUM/ «H0( MS. m.U’ r JS, tn.VTMl. I Lt.PTI 11, 1 1 I,hT| IS, M) 
COn^jn/sut*/ Mm,m,0MHim,0Nt)M i i.odiit, in 
I .OVTtlSl.OVCIIM.OwlUM 

ionnqn/sutt/ nut ill ,s*2/i m 

OlNfNllON SPI 111 
I - I 
J » NYS 
r f 1 1 n si 

IS TONTINUE 

■ Rf T( 14 , IDSOI IKS.MUT 

1OS0 Ff)AMAT( lHl,//2*.*R0N-CONYTAC*r> lU'RUr, . 1 0 X , *1 T ENA 1 1 QNS l%,tON, 
3*M»E ■•■CIO, ),///! 

JO TO IS 
l* CONWNUF 

MN|T(|«,|PSl> IKS. TAUT 

l<m FOBNiTl IHI , / / 2K, »C(MV(RG(Q CUIPOT*. 10* . » I TEN*) | ON) »*, M.IQX, 

i*n« *•, i la. n,//m 
is continue 

DO 1900 NS*l,NSf 

Cl*XO«KSI*lOtLTATftSI • SINITHcminSIM 
C2«*«*RS|»(«LIA1IS» * CC1SI TNF UUll 1 1 
IEINS.E4.II 40 TO LINA 
4*111 - 0. 

C S « *61 N 4 I MRMnlKt,} I«IHM . II 

an im o>i,m 

• » M4NII « (Y<><Vl«l£2~N4lR*1l I 
C4 - **RHfJIN5.KYI NIKKI,* Y» 

STINT 1 - I IC*»C5 I •, 1*0F 1* Z f NY 11 * SF|«t-|l 
:i * t4 
1241 CONTINUE 

*■* ■ IC?*U*/ll.*0*lTAItSl I 

Cl > ISFINTSI 'TMtK||»Cns< IHETNINSI m »|, 

THUN - NIIKSMIIUSI/C' 

SO TO L*NT 
124* [ONTIMJI 

DO 1 24* IW.irt 
im SHMI • 0. 

**F • 0, 

OEIIAN * OtlT *1 1 1 
tl4t CONTINUE 

VftITf Ifc.oJ 11 XS.SlKSI .rHmiMhVTilltl.OfLUtMMIUUllIll), 
110INS I . *6f Nil ,Cl ,C2,0 itT I N4 J ,Qut'«f I , <*< UM 
4*1 Nn(»iT(///2X. *600lf STittOv .« , T I , * , H, *TNf T * •*,fl,4,U 

I p*6ft * .*,M.*,H,»nuri ■•,TT,4,4|,*nn IM ■p.iiq. 

2*X*0D -•,(*. 4, *L,*rBOO >T,M.«,4l,«(V<n( ■ * ,♦ * . 4, Si, * Time. .4, 

9FB.4p//2IT,22K,*0llT PT.E10.1.SN.40NC *N,FL0i Ml.'Ml -«,( 10. ),// | 
MftlTCf*,477l milNSI.SAIZlNSl 
TTJ fO«Nimi,IH,»TFL| •T.T|9,),1I,IU| -*,n0.1.//l 
NMTfUtUflll tNf, NT* | ■ J I 
MltllNillim ITtNTI ,NT*r,J1 

rtlif H« itosi iTU‘..m ,« vp|, j i 

NN|TT|*,U041 IlMIMi^FTl ,N 1*1 , J I 

N«rtE 16, HOST ININS, <r> ,4 v« I , j l 

UNITE l«,l|«*l ruiNS.KTT ,*y-t,ji 

MR|TM*,I10T» IVIRS,<T> ,«T-I ,JI 

MB | TE (*« MOI > I v*"l NS I NT I 

MMIII.IIOTI I TINS, NT) ,«T<l,j| 

MAMMA. 11101 IMMMS.KVI ,NT.|,J» 

NNlTF|*,||in ISMNS.RV1 

T«im*,HUI ivmt.NTl , t y ■ i . j\ 

N e T r F 1 1 1 1 1 1 1) IN1 InS,nti ,**•(, ji 

NNMF 14,11 141 IQNlNS.srl ,ll,l,j| 

Nt|TM*,ms| <OM(ftS,*rt .«»•«, i) 

tfR I T( (* , 1 1 1* ) I4NINS.NYI pNV-l.il 

W» [ TE I*, ll|T) lOftll^lt) ,NT>|,11 

*11014,11111 I NM/lT US, KYI ,IT»l,Jl 

U * I T E I * , 1112) (LIT I IS, NT I ( «T.|,jl 

UN MM*, II 3)1 IYTINS.RYI ,X).|,ll 

wNMEi* a ins> irncs.KTi 

UNITE <*.11)11 |NM«S,crl ,«Y*l.j) 

UN Hf(6, tun (T*UlN S, NT I ,*.*'» , J] 

UP|TEf«, I11TI [SNIIT1, M>l,j| 

MIT FlHlll*lll,rH)F . I II E IQ. 1, HI) 

IH»1TF(*,4T4| AMP, SPIN Til, PELT AM 

*74 FONUATI//ISK, *MftfS MLiNCM.n.tP'KsnrtN >».Eia.9,1X,*tM9C« l AYE 
IN •N,E10.|,SX,4MITA MASS P4.F10.T) 
hoi fopmm jx, iohny ,iiii7, uni 

1102 FORK AT 1 2N, TNT ,Lllf 10.9, IX) 1 

lias *OKMAH 2X , T1HP . I HE |1. ) , |X » F 

M04 F0AM4H7X,TMRH0 .llfElO.T, Ml) 

MOT fONKATIZN, THH rlllTIO. ), IN | | 

110* FDIMTm,7HU ,1|IE|».9,1N»| 

IIOT NDlTitlll.THV . I Mf 10 , 9, IK ) 1 

||0« NONHNTI 2ft, »» rlllMO.l.MM 

M 04 FOIMTIZi.ihi ,11(110.1. MM 

1110 FORMAT! 2ft, THMN tllMlO.T, MM 

mi format I 7i,7«sx ,iimo.MUi 

1 117 FOMNATI2X.7MYA ,111110.9,1X1) 

ms FaxiuMn.twi ,itiiio.9.iiTt 

III* Fr)NMI||l,TNQI ,M1M0, 9.1X1) 

IMS FONMHZX.TMON ,111(10.9,111) 

III* FOMAT 12ft, TMQH , 1 1 1 ( 1 0. 9 , IK 1 » 

I) |T FORMAT I ZX.THOD . 1 HE ID. J.1X1I 

1191 Fn*UAT|ZX,TMNWJT . 1 1 1 ( 10. 9 . I* 1 ) 

1117 FON(4Al«2X,THUT ,11(010. 9,1X11 

II) 1 FORM AT I2N,THVT ,lt(H».) f l<H 

119* *n«N«Tf2X'7H»r ,ll((|Mimi 

MIS E0RMAMZX.7HHT , 111F10. 1.1XM 

MSI FOiMTIJi, JHtAU .111(10, 9. 1KI1 

1100 continue 

Rf TURN 
(NO 


C SUBROUTINES for chemical equii ionium calculations and SOLUTION Df 

C N A NX t Mf - MJ CO* 0 |T EQUATIONS. 


SU TROUT IMF INPUT 

intc«* t anga.fanob, char, nl amk 

IMTE«(N NMOA, ANDO 

COMMON/ NADC(M/FRm,M>,Tt| lll.VNUI lll.MMl Ml , SRI 1,11,61 
1 .THETA, SV1 , SP | , I* | ,HS 


COMMON /E4PC0N/ NB I M,1 1. IFC I 9 I I , AT 1|* I , AT 61 B I ,NAT 111, 

•I NATIBI, IN I a ). IS, RBI ID) .LAM HU l»R,RC( 91,21, 

2 NPI91,2),i«(Sl.ZI,NR11l,2l,T,TK|*,6T.TO(B,i), 

9 rO()L«2l«XN1Sll, V nuI 91, B), 12 ,19, I TYF , NR2.HCH .NCV, 

4 MM, VT Ml lli,V|>tl,T«t9|| ,l9P2.F4N0Alin,FAM»M9L), 

5 ISP,N,Ur 91 .KlN.Rdur.NANl ZO),ATCIO) 

CfNFMON 7E4ICOM/ SIP.H1P.EL , EML, fL 10, CPF, |R(, I («, AX, »T1, IN, u , IT, 

1 mope, hmelt.snelt.tnai, tmi n, niu, %<m». suml.ibimi, 

2 EBI«»»E4UIB1. A(l*.14l,6IL4),(M9|l,ALP(<l,FMU(Bt, 

I SAWltl.CINFIgnx.w, CPC ,0Y( 1 ll,CPI)LI, 

4 Ml 91 1, 16 Ml ), rcr II j ,VANKM(I ,(1911 .TTMTN.TTHXX. 

T NNUJ I 61 ,US,ll$S.ISPQ,OCI«), ALNNlBl.tr (01. 16CI6 I, 

* Bl.XR JrSYA.SYB.SVC, SVO, SUMC, MV.CNF.EP, IFCjC, 

T NTO.NTV.J'HNI.tf (RI.LFFINI 

COMMON/ SUTCON/TNS,PNS,WS,H|PNS.SrPKS.AMAK I, CPF NS, CSPMS , ALfNS » 
16( THUS. 0AMftS.VEL.SA2. NYS 

o Inc ns ion FIJI ii.ii.irtn 

OUMMCN IICFPS1Z1 
OIMFNSIINI UM| «, t | 

C0U1VAA(MCE|TU1 T2I.TPI.IVNU.CIJI 

DIMFMSIOM (ORCEIBI, IN49), A**l 7), ALPTITI, 

It! 1 1 .KPMA 1 21 ,AAI ?1 
01 RE NS ION ICI 61, LIMI A, l| 

901 FORMAT M 91 

902 F0RNAT(AC4,*.2f *,Q. I IT 

9020 FORMAT I IXACIZ.S, F|0.*,P||,4. T 2/ IXAC LZiI.FtO.*,F)1.4,lZI 
901 FUN NAT I IM /1H ) 

904 P DAM AT I T 9. SA*« F4. 2,Tt A, 91 
904 F0««ATIT(F9.a,m. A2.BA41 

DATA CM4M, BLANK /4MCM4N,*H / 

N J N * 4 
N OUT * * 
ft R I 91 *2 
ftNIZl - 1 
10*7 Ml*0 
P-!. 

V(NT-R*|,f-* 

F | NT* ALOGtY INT I 
NMMJ-I. 

ft E ae>in in, ioi i is 

JATIBMO 

IN.) 

IF tlS'lOl 111. Ill, *44 

*11 RF *0(X IM.904I CN4T1J1. itlljl, ATTN), ATCIJI, UATIJI, ITCIj.ll. 

I 1*1. 71. 2-1. Ml 
00 S4 I-I.xri 

nn *4 

sp 1 1 , i , ii> hsi T x( j ,iu 
94 cnMiiwit 

On *9 J-l.lS 
*NI J. I 1*0, 

4* CONIINUC 

DO )7 j c,|, r 
N A p 0. 

00 127 J*I.M 

in«AT< JI-44) nil, 911, im 

111) lFrTftlJ.NI) 924,122,171 
924 (i.lMftlJ.M 

TNI J,RL*-TmI J.NF/MAT 1 Jt 
CO TO 12? 

m VAPV*»TN| J,Nt*4((li» 

921 COMT INUC 

IFIVAI 924.92T, |Z* 

IT* 00 929 1*1. IS 
)7» ti n.N i . t«< i.iM/m 
1JT CANIINUf 
i ftp* t s*i 

|(|x»l)ll 944,144,994 

m (♦»»*■». 

AAApO. 

4*0 
M • I SP 
i*l 

1*2 Af A.01N IN, 906H HPM N 1 , J AT In I.Kpl.TtiSOPCC . A 40 A, AMD* 

I F I A*PT( 1)1 ML. 944,144 
144 0(1 MS «■),($ 

9*1 C4NI-0. 

DO M4 |*|, T 
IMJIIIIII 944,9*4,1** 

1*4 DO 94 T M*|,tS 

ITIJITMMIIMIM 94T.I41.14T 
94 T CONMNUC 

AltOlft IM.901I 
M T(J >4? 

14* C INIp AL Pill) 

944 CONTTNIK 

«ft*o, 

1*1 

LANKA *0 
on MO Ml.TS 
IPICIIII 14T.9IS i 9BT 
III LArtKK*LMR«t 

UTpMT*C I 1) 4 NATtll 

11* l-lh 

IFtJ'191 M0.9A0.944 
1*0 JN«H 

90 9*01 1*1,11 
9*01 CIJll, j». CHI 
UIMJI - LL«I 
TP I AN) 120,920,111 
ill W 114 l-I.JN 
I ML* INI** 

UC*^t(lMl | 

UNIL.JI-O. 

ipiuohi m.iinit) 

699 on 949 1 >1 rL 

IMS 0Mrt,j)»uMci«Ji-4»ui,i)»uGir 

00 944 |,|ML« H 
•** CMI-CI H'T*UI1,l)PlMM 
1)4 DI|J,U<0, 

120 DO IM 1*1. IS 

IFI4IS ICI ni'.DOH9l«,)l*.)17 
*14 T Au| T • J1K) . 

DO 144 I-i,JN 
94* TNUm.M- UMlIiJi 
BO 147 1*2.11 
14T VNVt 1 1, 11*0, 

LA«I(M)-L LNRK 
CO TO 9 TO 
BIT rMU)-l 

JMU.il. I. 
an 9*6 L*| . J 
B4* UMM.iMJKIL, Jl/Ct 1 » 

AO 1(1 Lp),19 

121 Tiuii.jKuwcm 
rc*riNT 

iipj 

j-i»i 

IFlJ*m 9T2.9Z2.929 
924 OO 990 L*2.IS 
JM-IIP-l 
iMj*iRt imi) 

DO 1)0 Rp).jN 
UCH-TAUI IM J .ft I 
• 00 110 |.|, (I 



1466 

14*7 


C' 


00 Jl) IM,I* 

337 txt-MHi, 

im 1*1-11 13*. »»>,»* 

114 DO 339 K«1,ts 

V-UNIK, 1*17 
DM*, j | 

33* U*<F.,1UV 

(N(| l»]M| IN | J 

CD ro J3T 
133 CONTINUE 

CNCYiUf.^ r« SF 5 * S c j4«F1i»0«J0FNrf 
Rf> “ *N0 CDLl/NN 5u-s 

DO 401 1-l.ij 

4oi ir.rit— i 

EVALUATE 1NIMAL SU«5 

L1M0- i 

on *o/ nt«ts 

DP *03 

UNf i, J|.N00(LANItJI/(ANn,7| 

1 c I VI » let Jl * tin) f.j| 

*03 mil. IMI , . uMf.j) 

40^ l. MO^l ARn»t.lND 
CHfCF ros EMf»5 
476 I ro 

40% 40 412 (■ I . IS 
. . « R MCI IMI2) *0*. 404, 60H 

*oi oo *0* 

1P{LIM(J,II) 407,406,607 
*06 continue 
cor icm..j 
t * I J 1-- ( 

DO 4/fl IC-1,15 


LI M J 


n.o 


(F(L1M(J,Kti 624,627,42* 
47? ICC<MIC<<MI 
ll4ti,<!>0 

*?T If il [M| i, I 1 I 622,421,4/2 

422 L <H(K,r |.n 
llltl.lKUl-1 

423 CONTINUE 

r.n to 413 

«“ Z'lU'Xi'n 

... u.’i, 

r*c | m-j 
LI*M.J1-6 
00 If) 4)01 

*10 continue 

*101 3a *3o * .i , r j 

fflttNIfl, Jl 1424,475,42* 
*2* TM*I>1AC*|-| 
t iiu.ji-a 

429 IE 11 INC c ,4)1 42), *30. 4/1 
*71 L I Ml J ,« 1-0 

icon. ten j-i 

*10 CONTINUE 


r.n i 


.13 


412 CONTINUE 
12-t/. I 
SO TO 40* 

413 Ifi.ft-l 
J-lS- I 

If f Itl 4 14,414,4 26 
*1* l f IHM3I-H 3 72 ■ 3T2 ■* 13 
411 7*60*1 til. 4Nf|4 

ND 416 (•!, fS 
« — HMM 
ten >-eino«<ki 

416 1*11 I -f 6NU fll K | 

SO TO 172 
349 00 161 C-I.IS 
VNUIM.ll-0. 

On 36 | |.|,|| 

361 VNUIM.LMVNUCII.Ll.CtlMlMM ,T| 

l*«l( II I *L INK IK 

170 <|.|| 

11-71*1 
TC. 0. 

172 »f*0mN,S02) (6 A|f | ,*61 jet ,K| » 

tu iffini. t«m,<i 1 ,iwj (i ; 

.... If IKPNAftMKPMflt/ll >m, 3714,1914 
”** I 7HL9N*H 7 -N0N4I 2>-4» I M* f 17 3T, 1/14 
1744 VNtTE f*r»jT,3T33J *NflA,A-r.* 

S?0P 4T,/// ' 2,H ' H4 “ *"■ /I4t 

J ' M I f I ifMII 1 1 -1) 1714, JT27, 1 Tj t 
S7J7 TUlKK.il-- mm, I, 

3727 CONTINUE 
I 72/ FanoaimmAnOa 
UNCOCK* ».*n< 3B 
tfTNlKKI.nr 

ROCK* ,11. Mdt, i ) , ft*n | 

*P<M,2l - R»<rk,/| * aim 
N-N*l 

jH*PH*ai-lHTJ4,l62.164 
164 IFCtiuM.-t 
tfNIKKI-C. 

7CKKMYC 

Jf IfftKKI-TfNMl >42.147.371 
17) lERIhTfUM 
on rn i42 
362 CFCIKK1-0 
VNCKKI-VINT 
YCKKI-riNT 
GO TO 342 
39* CONTINUE 

DO >?5 1*1,4 
DO 175 l-t ,11 
TQCT,lt-0. 

Of) 375 «-l , [i 

375 roc 1,1 '-T4(l,l»4UNH,M*m*,i 1 
1752 VMn. | | *o, 

IfClWMI — 1 
NTN)NH1— J. 
fftKD*1N«||.CHM 

FAKOtHIMn.flLMR 

CffN-l 1.50000. 

Kf TURN 
END 

subooutdn eouu no, r i. p»»i 

IMTfGFfl FN 

Mtreem fANOk.FiNoe 
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C09 WTN /FqrcriN/ S(P,Ht8 r Fl., ENt , FUQ,CPF,|HF-.p F0.AA, ITS, IN. (1,77, 

I MOOF.WI-LMSMMT.TNAx.tMiN.NElT.SUHN.SUML.m-l, 

* l*t,M|A,|*l,BII*l,IPI9lT,A|.PIBl.Fl|Ul«F. 

canhi oi.gahf< <n ,jc»hc, cpCtovoi >,cfi n i , 

? "MM,SBnM.TCmi.»flNl|NlP r EI3n t MNIN,7TN*X, 

4 PNUS1NI , WS.MSS, I SPO , 9C 1*1 , *LNM 6 » ,sr(4> , IbCI* P. 

*> 41<«iU.SVA,SVII,SVC,SVD,SU»C, "YrCNF.fA.tFtJC, 

7 N7G,MTL, JJIBI, ftH*l ,IFM*I 

DIMENSION VI AN! 9 l r i » , y | lAl 
BJMFNSIOn LIJI M.IUTFIH 
F0U1VA(.CKCICTU( >2 I ,TF| ,( VHJ.CI J I 
MSS-MS 
DO 4 I* I, I S 
lflCCI I-IFCHI 
i ny-NlS-wri/yrfi 

fF (UUI<1) 70,45,50 

1 if iits» 10,60*70 

io continue 

Ktrn-HHtTi'.i 
IF IWiri-ll 70, 60 , TO 
> yilK iKfmT, 65 > ([, 1 - 1,151 

‘ ,! M,, tI. ,5aMl,rS 0*F$*-y1 €0(111 F* -A SOIL E* SCAIE Mil. 

17M NASBAt1/90X3U9,TH MAS*Alil 
INITIAL ! €1 
I M -a. 

:pg«o. 

tP-0 

CPF-0. 

JC-0 
JCS-0 
11 *. rsti 
ISfO-IW 
DM 1 - 0 . 

sm-a, 

4M.11-0. 

4(1,7 1*0. 

II 1 . 1 1 - 0 . 

412, 71-0. 

W 11 l |!us Uf CONTRIBUTION OF -fist SIGNIFICANT SPECIES IN ftCN ■ 
EMM- 0 , 

Ft I I-4APALPI 1 1 
1SP2-1SP0 

MAIN BASE I1ICIF5 1 OOP 

60 1» tH-I.IS 
t • 7-101 | ■ | 

If IRAMPHl-p-l 09.B0.01 
-nwj. r-7»-o. 

IF HD NATO ] ( 

00 90 H-| , (SPO 
*<K,IM 0 . 

IF lltsi MO. 91,116 

NORMAL I if ON P»EJ$lfllF ON F f ASF Pt*S 
VN| I-7l-VNM-7l/4u«N 
* Bit I -2 1-6. 

IF ( | BC 1 I -7 1 1 110, tl>0. 1 01 
I TM-tl-MWI'tUNl. 

CO TO 110 

TNI l-7l-VNM-7l/4src 
TNI T|4l 1 1F SON 7 «i; 

1 *MI-0» , 

Atl'il-D. 

I M 1-71-0. 

SFT F L AS INDICATING SIGNIFICANT' OF (PK|M IN pull 
BALANCECM AND (NCRFnFHT r'HjA'r on (1(1111(11) SPECIES 
IF 1 VNM - 71 -E1L I 1-21 I 120.120. »M 
IPM-7I--I 

TPCAf BASE SPECIES CONTAINING Nut NOT • FPtFS-NT INC. NON-PAPSE-t 
flFNENTJ IN SMI NAnhF* AS NON- PRESENT CCJNOfNlFP »Pf I If J 
IF I TBC I t - 7 I • L I 129,129,179 
If IFBCI 1-21* 186,219,116 
AM. | 1-1. 

VA-VN7J-7I 

IF M IBS) IStU-M- T1- H 199,716,140 

*12,17-1.0 

r.Q TO 290 

IF I Eli 1-21-4611 VM7 149.190,190 
FBI l-21-ABSlvil 
I 61 1-27-T-2 
FIHI-HI-JMA 
IF 1 280,170,260 

TNI N— AN 41 1 1 70] N, TP < r - 21 I 
IF IT-IF lt-2»«.0*M |79, 179,190 
*11,1 1-1, OF *10 
FI 1-21 — VNI 1-21 -I.MIEMO 
- 00* -0 

IF INO0P-11 1 19. 190, 1 69 

IF IHH16I1 2*0,260,190 

IF I TF1J-2I-*. 401-11 125,1-9,1 04 

IP 1JC1 209,209,200 

IF IY1I-2I-BJCI 929,129,709 

BJC-V1I-2I 

JCi-AC 

7MA6-Tf( 1-21 
JC-l-7 

r«cjc-iBci 1-21 

IF (R 6 I 6 M 210,210,260 
All. JCS+71 -0. 

• 11,11—1.0 

5D TO J29 

-----CAS PHASE 

VB-VWlt-21 

CPG-CPG-vA-CNcl-Zl 

AM • 1 1-VA 

412,1 J-VA 

EP-EP-VA 

full -21- A05IV4I 

I BF I - 21 - 1 - 2 

FI I-21.FII-7I-M 

IF |H(J0f-2l 920,100,261 

IF T ISCI t-211 119,299,290 

*05- SB! 1-2 1 

CO TO 9<J» 

NQ$-S«1 1-21- 1.96*9*71 1-21 . 1.-649 

CO TO UO 

N01-HII-21 

IF IIBtll-ZII >25,110,199 
4<l, I I -NOS 
SO 10 >19 

AM*ll-»*)'VFII(-Zl 

4(1,21-411,21 -HOI MINI 1-21 


21*1 

2t*2 

2t4l 

2144 

2145 
2144 
21*7 
>1*8 
21*9 

2150 

2151 

2152 
2151 
215* 
2155 
2190 
2157 
2159 
2154 
2140 
71*1 
21*2 
21*1 
21** 
2L*6 
2144 
21 AT 
21*9 
21*9 
21 TO 

2171 

2172 
2IT1 
217* 
»11 
2176 
2117 
21 7B 
7174 
21*0 
2161 
2162 
21 B I 
21 6* 
21*5 
21 66 
mi 

216B 
2189 
21*0 
21*1 
2167 
21*1 
716* 
21*5 
21** 
7!*T 
21*6 
21*9 
2200 
2701 
2207 
2209 
220* 
2219 
224* 
220 t 
720# 
22a* 
7710 
2211 
2212 
721 J 
271* 
7215 

2716 
7211 
271* 
2214 
7270 , 
2271 
2227 
7721 
272* 
7729 
2274 
7777 
Z729 
Z77* 

72 90 
22>| 

2717 
72)1 
271* 
2799 
279* 
2211 
221* 
779* 
72*0 
72*1 
72*2 
77*9 
774* 
27*9 
21*4 
I7*t 
77*6 
22** 
2250 
2291 
2792 
2791 
279* 
2759 
2794 
7797 
2291 
229* 

22*0 

2241 

2242 
2241 
229* 
22*9 
1744 
22*1 
7764 
224* 

7210 

7271 

7777 

1271 

277* 

2775 


920 CPF-tPF»CP 11-21 *VNM-2I 
929 CONTINUE 

00 >10 1-1,14 
TFT I 1-El 1 1 
>90 8VM 1-MI1 
lfN-0 
IPF-O 
ECR-O. 

C MAIN NOH-0ASE SPECIES LOOP 

350 IIH-M-AR(O) 

IP ILIM-TSPI 710,444,959 
359 J-I4N 

06 T25 In-ISP, l t* 

IF ITK-NI 364,445,940 
340 FIJt-l,€-tO 

IF MFC (011 *10. 725, *49 
9*5 IF MFCCJI-M 729i>70,3tO 

910 IP If Til 1*0, 975,9*0 

*15 VNf J )-TH< J l/SUNN 

IF MFCIJll 1*0, i»*,*RO 
960 NNCUI-VNMI/SUHC 
00 TO 4*0 

14* T| J 1-71 J I- SUHC 
3*0 FIJ1-VLNH1 J1-MJ. 

OO *05 l-I.IS 
IF HBCriM *00, *00, 4*5 
9*5 FNUMI-O. 

CO TO *0* 

*00 FnlH II - VNti( J, C I 

F I J I -F( J 1-FNUt t >*ATI 1 9 
*09 CONTIIUE 

*0* c A6- ABSt ( 1 J| 1 

IF flFCI/M *10, *60,4*9 

c COMoeNsin sp«cifs 

*10 EAB-EtJ I 

*75 IF IEI2I-EFHI 531, 5H, *10 
*90 fM-FtJj 

IF ITEOI *79. *49, 4*0 
*99 ISP0-1SPQ-1 
lEH-ISPO 
**o iF-ir» 

1HE-IH 
SO 111 *90 
4*5 MPQ-ISPO-l 
IF-IJPO 
*90 6TP-0, 

**0 OH 4*4 I -1 , ispo 
AM.ICI-O. 

*61 *< IE. | 1.0. 

50 *40 c-1,15 
MN1-YNUIJ,H1 
if r ia<i mi - 1» *ra, « 70 ,*a<i 

♦ID V*,<WMt*vNtJ] 

AIFF2,TEl-mjNl-NT««|NlCIA l-t -F.4MF |, . 

lF(U.«tll)-Vl 

IP 1 A6S ( *A|-( *1 AM *A O.*- ). * 7* 

*M F*(* I* A»S( VI! 

IMII-I* 

*na CONI I HUE 
A-IF-24N7 

IF Iln-NI 409, *07,4*5 
*44 JJIK1.JC 

IIIIUTUC) 

IP IJC-ISl **4,«*9,*70 
**0 AMP.n-TCliCf 
MIII.IUCI 
*** EAB — PMFl 

I F MFC Jt I 1 1 *, 115,500 
9D6 1 10- ABS 1 1 ABl 

40 PO 714 
909 JIlM-J 
JJT41-J 
A1 IF,1!-T£l |l 

imi-iui 

IF * l.,(Ml-T» 1 il) 5| 4 , * | 0, A | |> 

915 IF AKkltn *10,990,9*0 
91* 1MMnO*-ll 410, 429, 410 
479 AI1E.lfl-l.EtlO 

At If l*-7Nt JlM-OOlfMO 
*(*0f -0 

>50 I f I -HOP -/| 919.575.4*0 

49* IP IM0C1E-II M4, 4*0,714 

9*0 IF IT-TPI Jl-.OOlt 9«* f 5A5,9*0 

9*9 IF IJCl M9.974. ISO 

MO IF IE1U-6ICI T74.T27.74* 

447 BIC-Elil 
ie-16 

|FC|C-X*C1 JCI 
PMAH* 7F I J J 

I* 1NRI6P1 4*9.969,7*0 
5*0 |F A nOOF-2’1 725,975,700 
*»* NUI-BJI 

06 470 6-1,14 
9 10 *1 1 , Ht7>* -FNU I x I 

A1I.II-K1JI 
CH TO 774 
479 -OS-Htil 
CO TO 949 
960 H6$-SB(j| 

>64 *ll,f!|.H09 

All, 71-All, M -TNI |1 -Nm 
tPF*CPP«CPI J1*VN( J| 
co rn ti* 

C IA1 PHASE SPECIES 
4*0 TP1JI-0 

IP IPNIJH 964,114,9*5 
459 10-0 

CPS-CPC-VNt JI —CPI J I 
624 D(1 M0 A I- l, IS 

i*»-m«ii 
VA-VNul J, I -2> *VNI JI 
A*4 4MI-21-BIM-71-VA 

HNS VA-ABSt VII 

6>0 IF 1*0SVl-fNlM-7ll 460.660.649 
6S4 10. 1 

ir I4BSVA-FB1 1-21 > *70,670,64* 

*60 IF 1ABSIVAI-MN.M-2M 410,640.670 

*P>4 EB1 1-21 > AflST* 

1*11-21-1* 

6T0 DO 6T7 5-3,IS-i , 

475 All ,!>**< I.M.VA-FnlPI k->| 

41 ll-tll l-PA*EI JI 
Ml, 1I-4M, M-VIMCIJ1 
• 12,11-417,1 1 *7<M J I *FNU| t-71 
4B0 CONTINUE 

IF 1101 715,714.669 
445 PP-EP-VN1 J I 
JPUM-1 

Bl 21-tl 7 1- v«tl Jl*f I JI 
4(2,11-4(2, M-VM1 JI-TC1 JI 
!P (WOE-21 7 10,640,6*5 
6*0 Mni-NI 4 |-VN< J 1 
■ oa TO roo 


2276 
22 T! 
22 7B 
227- 
2240 
2?41 
2202 
2207 
22«* 
2749 
2266 
2261 
2274 
2217 
22*0 
27*1 
22*2 
2291 
221* 
2295 
72-fc 
7297 

2298 

2299 
2100 
7301 
2307 
7353 
230* 
2309 
7306 
2307 
7101 
230* 
7113 
731 1 
2117 
2313 
231* 
2319 
71 1 A 
7117 
2110 
7319 
2170 

2321 

2322 
7173 
212* 

2329 
2326 
7321 
232* 
7120 

2330 

2331 
2112 
2311 
73 3* 
2317 
7316 
2*11 
2 934 
79 9* 
Z>*0 
73*1 
73*2 
23*1 
29** 
21*4 
21*4 
71*7 
21*0 
2149 
7>4» 

mi 

7352 

2351 

234* 

7144 

2136 

1151 

2194 

2359 

2360 
2161 
7167 
7!6> 
714* 
2161 
7166 
7361 
716* 
2149 
7310 
2 IP I 
»M7 

2173 

2174 
7314 
23 16 

7177 

7114 

7119 

im 

2341 

7192 

7 in 9 0 

710* 

2344 

7186 

71IT 

21RB 

2109 

2390 

7J9» 

2192 

7191 

219* 

2395 

2396 
21*7 
2104 
2399 
2*00 
2*01 
2*02 
2*93 
2*4* 

2*05 

2*06 

2*QT 

2408 

2*09 

2*10 


IT'vltoDt'craK.TrY OF THE 

SpiomVpAGEKPOOi. 





TO* • MttUH'J*RFIMjM-2l*A«l,It 

*ri,ii-Ati.in<os*Tcui 
«l I I>HII-Has«f 4 J > 

TtO Of-CFF-VNIJI-CFUI 
M* IF I FL-EA6 I T70,T75, T71 
7*0 Fl-flB 
775 J-jTl 
T10 COWT1NIK 
ISFI-lft) 

IF INOOE- 2 ) T **, 7 ) 5, 700 
715 CFA*CPF*F 

SMRLT.HRF l T»VN<RELT» 
f HS *4A*Hrp. A| I 

if irkjui r*o,r*o.?io 
»*0 ouri-wa/aa-t-t 

0 H 5 -AA»SVC~OuN|«A<l ,71 


At L, 2 |.-AA*S*C-nu*l 
£»A>IC*F«t'*DU«lS 1 l*r 
IMPMVIMMt 
*«MF 


t»o. 

IF [AtS1fHl/«A>-IO. } T65, T4* i T40 
74 * f P.-V.JVD- 0 UN 2 

M7,M*A1 J„ll *0lM7 
MI.}»-OUFt 

’TO IF I (MII-MWEI *69»T9*'T6) 

799 M lt?l--Al*«IT 
Sfl TO TAJ 
7*0 LFA-CFP 

NUT) 

1.7 

TA4 MU.tlllltHS 

ni.n>tii,ii*CFi 

IF T89,T19,T»<| 

T’O IF IFn31 TI9.7IT.TT* 

TTT chWh*-Sh-LT 

MII-OI M-IMM.T 
IF IFHJI IN.m.tW 
Tin Fir^l.*FMS7SMi«T 
*OOf*D 

Ml.tl-MMI 

1R1N* *00. 

MAI. *O00. 

*•* ENl<lltllF)/*»|09, 

On 810 1-1.1 M>7 
»U-7|.«I 1-21 
HU. I l-2(*( 11 l-ZJ*l.f- 7 
4 <i l n»-u«iLFii*n 
IF IIKII-JHI JU.m.Mj 
r*n *f *- *ff-» i 
r.n to 110 

/** rnhT[i«if 
80* 

■ RM* AOJ'EPl/ t( 0 ( 1*11 *t .t-ta I 
F NL -A-Al M A*f« ,fNL > 

NMI-OMIM* 
na :oi»THwf 

IF I 1**2-1*801 0lf.080.iap 
81* I v-0 
J7-0 

t *r>r condensed non bah *pfcze* to ton 
on 1*0 |f« | so*. I 100 
J« IF- 1*07 
4-JJOl 

If I A— 1 1 1 870.820.tl0 
170 on a7* i*l.l* 

•2* II If, <471.0, 

*1 tf.j*J| — 1.0 


*10 

*1* 

0*0 

C 


•4* 

8*0 

«** 

*00 

*•1 

*40 

If* 

*04 


on A** K-uis 
fontimt 

ELIMINATE TEAR* C008F*on^r>|KG fo opt If NT ntf < OHM Hi CD 

pn 09* oi.ii 

IF urcdlt 8*1 .Of*. >4* 

on l*» IF* 1*01, I *00 

IMF. 1471.0. 

CflK T I Nut 

F I 7 1 *f 0*M 2 I 

IF I MODE -I I 410, 840. 81* 

IF f A«S<b*S/4M.|1)-.00»ll *10,410,970 
IF IIFCJCI 899, *€>0.9<1* 

IF IJC-IMI 400. 409.40O 
*OOE-0 


TRIN-TTNIN 

IMI.ITIIX 

400 IF |A8*lami-I.F>4l 410,410,420 

910 IF ML-1.E-4) 41*. 91), 920 

*J5 IF IFNL-t.f-91 4)1,9)9.970 

*70 IN- 1*00 

IL-I 

IF l nopm 97*. 97*. 910 
*7* 19-1*00-1 

11-7 
K I | 1*0. 

*38 I E TURN 

9)9 IT-IM.1 

MS— I 
CO TO *10 
END 


*lf*N0UT|Nt Of RAT I N.C.m ,0, NNA. L*. |) , NOT 
C 0 I RfC T [NtFDIOR -ROC (OUF - — £ t* RFF*.A£F0 BT C«A-1 

n 1 Nf Hi I OH 0||4, 1 1, )0t40l, Cl 14, 1 1 .1 1 40) ,*(401,11 |I0I »LLM60l,iSHI 

I OUT-4 
Ml-NH 
RA-RHM 

90 11 l-1.N0 

tuino 

inuim iii.ii ), he 
112 till *CSl 1 1 
CO TO II 
1 18 Llll-I 
II CONTINUE 

l>*-| 

IF f 11*21 111, 10*. Ill 

I0A FORNITIU0 l 1 1 1,1*1, 13, JX 001)11 

IDT FONRATIOH 1 1C 41 , J) , J. t. 1 9. 1 7M» , 1 01 Jl , J-l * I ». 4M I , J-l. t ). l)H| tf 
HONE RE RAT J 

ION TOIWTIH, 1IE10. 1/1 |Zk. [8*10. 3 1 8 
109 *R 1 te < ROUT ,1071 NP.NNN.N 

MRITE lAnur.lCAINO.ILin.I-t.tioi 
IX-0 

on no i-i t N 

c TRIANGULATE RATR1* 

DO 19 I-L.N 
00 140 «-l, NF 
140 *|NI-A0)1Cir,NM 
IFItil It. 14, 14 


7411 
<412 
1411 
74)4 
2415 
2414 
7417 
7416 
7414 
2420 
7421 
2427 
2471 
2474 
242 * 
2424 
142 7 
7420 
2429 
24)0 

7*11 

2417 
241) 
2414 
74 M 
7494 
74)7 
7410 
»» 
2440 
1*41 
2442 
744) 


744* 
744 r 
749* 
244 * 
7490 
2491 
2497 

74** 

74*4 

74)9 

24*« 

74*7 

2490 

7499 

2490 

>4*1 

.'447 

2-41 

7444 

7449 

7444 

7447 

2448 

2449 
<480 
74TI 
!♦»< 
241) 
7474 
74 T) 
>4 Tft 
24 rt 
24)8 

74 19 
241) 
74R1 
2482 

248) 
24t4 
248? 
2404 
T48T 
248* 

74*4 

2490 

7441 

2492 

249) 
2494 
249* 
74 •* 
7497 
|44* 
244* 
2*00 
2 * 0 | 
7*01 
2)0) 
2 M 4 
213) 
2)04 
2*0 r 
DOB 
2*09 

2910 

2911 
2*11 
7*11 
2114 
2*1) 
2514 
2517 
2*19 
2*19 
7*20 
2*21 
7*72 
7)2) 
2*24 
2*21 
2524 
1*2 » 
7*28 
2 ) 2 * 
2919 

2 S)| 

2912 
291) 
1914 
*9)5 
7*9* 
2191 
71)8 
29)9 
2540 
2941 
7942 
294) 
7*44 
2*41 


18 rs-o 

3DHI-I. 

CO TO 12 

c HootE mi i tv Fircinmt *m,s 

It DO IT 1-2.1 

mil -11 

»!*—£<!,■ I 
1’IOm 141,17.141 
141 C It. * 1*0. 

00142 N-l.NF 
0IVC-0IV4C1 A-l.HI 
iixi-iMimiRi.igiiDuni 
162 CII f Nl*tll,R|»«|irc 

IFINNNl tr.IT.l6) 

14) 00 144 H-),NIM 
144 D||,N|— Dll . K I *0 1 V-OI J— I .Ml 
17 CONTINUE 

( 1(11 MAI | NUN MTU 

12 019-0. 

on 1) Jj-I,N 
■-LMJI 

IFUtl 8C1 I .All-01 VII), 11,111 
12) 01*- Ml 1CM.NM 
RRN 
J-XJ 

I) CONTINUE 

1 f r * i ri i iio.ui.iio 

1)0 104 It • 4I1/1U! 

1 1 71*4 Ml 
III )-H 

(F< SOI M-i .f-R| 111.1)1,14 
C SINGULAR RADIK 1(1(01 

1)1 lt*-1 

NHITf (ROUT. 1911 II l,ltltl.*orMI.JT-l.n 
RETURN 

14 DIV^II,«| 

GM.KI-1.0 

R-1LL1JI 

14.LHI-IU.M1 

itLinx 

ILIRI-I 

C NORN4LIII 10* 

MINIMI ■4l,l4),14| 

I4| AO 142 J-l. RUN 
141 01 1 ,71-0(1 ■ Jl/OtV 
14) 00 I) J-l, NF 
II CM, aUCM .JI/OIV 
IMIII 192.190,192 

191 F08NA*I7v« MWll ROM/CM. /RES.* Alin ?||4,|H/|), IM/E9. 7 < |H» 1 1 

190 NRlDIKOur.lill l I.Lf 11.101 11,1-1 , nFI 

C 0 I AGONAL 1 2F NA1A I A 

1*7 «MH| 

M 20 1-l.iH 

no <0 a* I, i 

CIV— Cti.RI 
1 F I DIVI 19.70, 1* 

14 CM, KUO. 

1F4MNMI 141.1*1,1*7 

192 DO |99 n-I.NKN 

191 01 J.MI-OI J.Rl -019*01 1 *1.9 1 
191 DH 101 «*|,NP 

201 Cl J.9|-ClJ.Nl-or*«CMf|,9l 
20 Continue 

C l9TCRCf4AN»F CIHUNN} 

on )* it-i.NF 

i-ii 

71 7*4111 

L I t l*| 

Ml j- 1127.10. 22 
<2 IFMSf2*,T).74 
71 90 >4 N*|,N 
)|N)-CIN,M 
74 ClN.i I-C1R.JI 
ll-f 
l*J 

on to li 

11 MI 19-1)74.71,24 
76 DO 28 N-I.N 

7V C |9 , 1 1 -Cl 9 ■ Jl 

1*2 

GO 80 21 
18 OO <9 9*1,9 
24 C<9,1I*11NI 
11*0 

10 CONTINUE 

C INI84CM4NGT Rn«9 
on 40 iMi, n 
I *11 

M A-IIIII 

lmi i-r 

M I A- 1 U2.40. 17 

12 i*mm, li,)) 

I) 00 14 9*1.NF 

lIH)-CM,9t 
94 CM,9I-£M,N» 

IFINNNl )4), )4), 1*1 
941 HD 842 l*t,NM9 
i«|IMIr.AI 
947 01 1,91*01 A. RI 
>4) 11-1 
l-J 

l« 70 II 

» IFm-Jlll.St.H 
14 on »T M*|,WT 
17 Cl 1 , 9 ft -Cl A i It 

IPtNNN) ITk.lTI, )T| 

171 OH 182 N-t.NNN 
972 0| r.NI-OU.NI 
IT) 1 • J 

GO TO 1| 

)A 90 »4 N-l.NF 
14 C 1 1 , R | * )f 9 ) 

(F19NH1 m.iti.m 
Ml 00 891 N-I.9H9 
142 0(1 , Ml* 101 M > 

94) I S«0 


IMIII 411,4*9.411 

401 F0M»aT( 1)H MCM,7l.4*U1»il2M|,lO(Jl,j.|,|) l 
1709 RfRAT 1 

409 UFITCfROUf ,A07| NF.NNN.N 
DO 4)0 |i|,K 


79*4 

m? 

294* 

294* 

2*90 

2*91 

<?*< 

«J1 

2554 

2519 

2554 

295T 

»»* 

291* 

1540 

2541 

2)62 

2 * 4 ) 

2*44 

2)49 
1*44 
7*67 
2969 
7)49 
7* TO 
2*T| 
2*72 
2571 
2)74 
2175 

7*14 
2977 
2*16 
2*89 
2*00 
7*01 
11*1 
2*81 
2*84 
7-189 
2*06 
2*17 
298* 
2*84 
2*40 
2)41 
2*92 
2*9) 
75*4 
259* 
2*44 
2*97 
2*98 
2*49 
2800 
2601 
2602 
260 ) 
2604 
2609 
2604 
IUT 
2600 
260* 
2*16 
Hit 
2612 
1 613 
2414 

2619 
2414 
761 T 
2616 
7619 

2620 
2421 
26 22 
242! 
7674 
2625 
7476 
2427 
2676 
7679 
26)0 
24)1 
76)7 
76)1 
Z6M 
24)9 
29)6 
HIT 
2418 
76)9 
7440 

2641 

2642 
244) 
H44 
744* 
2644 
7667 
2448 


Ml 

2651 

2651 

7**4 

2695 

7454 

1*31 

H90 

2499 

7460 

HU 

7**2 

1641 


pdl.l-l.ll.l9Ml *7 


264* 

2646 

2647 
2468 
7669 
24 TO 
1*71 


SUMOUftNt* FQ8 RADIATIVE TRANSPORT CALCULATION*- 


SU8R01/T1NR RAD IN 


2*7) 
26T4 
76» 9 
2*74 
2677 
747# 
2*79 
7490 
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C ... «e»[JS IN DATA FOR THE P AD I At (ON TRANSPORT CALCULATION 

c 

camioM/nuiFMVi»» .amyli is i ,ei r c?,c).C4,c!, delta, epsi m.rfnMl. 

2FL6I .6AHP4 )Q0 I.GFEtSAl.mi 1 *1 ,N2HA| ,N*E J,4M.P,IH)(SM I , 0 J C , 0 1 CPtl 1 1 
1 1 iNIHvC,W« t Vl{1 1 (Id ,P*f MUli T(l< IDiOHLl III* XRO. ,R<M ?, Ill , VQf LT 
4,VVClll,CAlttlSI'TNSUI50l f f M 

ctiNW)i«/uHC/Hin.niM».Ki 1 «i r rLCH( m ,n epu 1 1 , xnmi ia, 1 1 1 ,<iit , m«i 
I»m»xnouioo» .cupuoop 

CO **rm/ i N T CfW ff. I I 701 , N, M 

connon/conki/i* rc i * oi 

■■5 

*■* 

Rf i(l<N,06l HMCRtl il,J-l.?0) 

1«? FOKXtT I7(J| J| 

*f ■ Cl < M, 101 I NH», 0415.NXI 
LOO FnA9lTtAfl2.il 
C 

c input tables i«i i 

c 

• E4D(M,77«1 (5PMII .1*1 ,N»F 
4E1D1N,7/*| (EP)I 1 1 »|-1 ,M*fc)| 

4EADIN,226> IFHVN1 It.lH, NN¥| 

READ(N t 7/4l TFMVPl |I.I-l,<<hvI 
4EAf>t*i22At TFMVI 11. 1 •L.Whv| 
m P0RMiT|*f12.*l 
|P|NX1I 10.05,11 
41 •FAE>m, 10] | 1 IJM II. 1- l.NM II 
»0 KfldlA.IOll l NUl t I I 

101 FdfNAT<W)l?l 
15-0 

oa i j-j.nwv 

i 

» F 40< N, I.T2 M NO 1 | » .HVL < | | , f * 1 1 1 ■<■.««* I 1 1 .X*QL 1 1 1 ,CUPI 1 1 . 1 - I . I S I 

102 fniMtl I I F, lot. IF 1 1. 1 . V 1 i . 7 | 

90 All 

[FIXMOL M I .EO.O. I XfOL«l» • 1. 

♦1) CONTINUE 

oo *u I**,!* 

r M w*i t n-ma f |-| n Hi.Mi.M) 

*14 40001 H«.M> 

«w 

511 CONTINUE 

»ooo 7d*N»T<nH4«n«A»e cent** *’ .E9.t,7i» i* out op tp quince 

t 

c rxnji mv v m. t?f v *tr cnMrTvtip* cttcuiiTioh 
r 

AFAD4N, 1 14 1 fl-iv' 

119 FMHUWIJI 

RfAOSN.lOQI l»NVCHI.t-' . vIMVYI 
OO *«1> I'l.MIHYC 

IMlK»CUI'H»cn-n) »«2.5B2.5»0 
4«7 ttMiHu.won fwtm 

xtop 

*40 CONTINUE 

*001 ^r«aii21m*4**c»*(t i*t» «tg *t ,r».uiM I* rx»i of )tqufncf«»«*i 

*40 DO 155 l-I.HMVC 

minim • 0. 

14* IHPIII - 1. 

00 45* 1 * I I Wtt 
'•SMI1I » 0. 

*44 IHVLIII « 1. 

• I »U"N 
FMO 
t 

SUBROUTINE AAOICAi 
e fMW«o*i/ t Nt C «/m * 1 7 0 » , •, 4 

C DPNQH/RAOFAHVI 401 , XMVL I 74 I ,C I . r 2.C 1 .C4.C* , DE L ? A, «P*I * 41, PM tool , 
|fHVIP5>.PHVC'50|.FMV«(;)1 ,FMVPU0|,P|«T(|U,f IPU || I.T l 1 ,fL J ,fL . 

n it, i.ciivFi iM,^H«Mtii,wiF.RBiiati,Nic.ii|(Nm 

imhmvciWv.nik ju.m.mhiim, ieh i iP,«ot < i i i.woi.iai t, ii i, vqel t 

4, TV! I I I .CASH 141, miNllfil, 1 NINI 1741 , f N 
CO“«CM/LTNr/HVt( .«?.UC-« 111, TIC.* 1 1 |J,19NI IX , III ,«X) , I At* I 

I, N| pUrtlMMI .C^PllOOl 

connon/contm/nc nc 1 n»t 

CftntONmocnv/FNmdli.i'M I t, ft*! 1 It.MHl 11 1,145 t, 1 1, It 

1 , ThETA, *V| .\Pl , s*l ,n 

CALI DAOIK 
C2-0EITL*FlI 
CALL «OM 
C«LL CW*l 
IFIItUI-112,1,1 
1 CALL UNT7 
1 CONTI HUE 
RETURN 
(NO 
C 

SUBROUTINE 0401 N 

INTEGER F ANQi , F A4O0 , A| PH A , - f r 1 

CnW»/8k0/RHY<5Ol.tHVL<75l .C 1 . 1 2. C) .C4.C5 , DELTA, CP!( 511 , M < MOt , 

1 F hv | Ill,lK«C<10>ilHini|7M,PNNtr7M 1 i I All II I.MOXI II I.FL t,FL7,fiC, 
lfL6l,0«t| *0»|, 0( El 44 I,N1 i l«l,VU«l ,KAF4,4CSLP, KOI loot .NIC.N1CIU II 

II, Nlt«C,IO<V,N«l**l 1 NT,FFF*l lt1,T(lm»,«0LrHUW0l ,*0|F,m.Tt«LT 
4.yy ||l» f C4MU5t.tNiiH4<H.T<*4NL<MI ,TW 

CONNONFLINE /NVL M00l,Al. v 7.TLCA(tl1«TLCMlll, INNt II , I U ,**JM , |4|4 I 
1 . NI . INOL 1 1001 ,C>»4}0ft) 

C ONNON FCON TN/NC ■ C 1 10 » 

f. HNNON/ | NT CONFA It 701 ,N,n 

r:n*NnNFHLOC0N/F*| 1| .1 I I , TM 111, 11 > .NNI MI.SII UU.lt 

1 , rnt tA t *V| , SP 1,4* I ( HS 

conndn/eoocon/flcii * 71. luini i,f»c»i ?*i,im 11 ui,l«* 

1 ucmiiiC.ruti 24i»it,f*it!f«*Qi ( 

7 IlClUUMCUHfUFICU t*l,Ull.UWU)|lillNTMIkl 

1 .1tP*NTC«iF4C4"l,*1it,Anur.KAN170».FICH *1 

(OUIVALERCE tfNlm I IpAHVI I M , I F R4NI P 1 J , AHVL t l II 


DHMH4JON A4MAIl*»,Mt*1 T| 
oiNfNHON nor ioi ,«tni4o i , ?*s*U7* i 

DATA | ALPNH J I , J- | , 7Mf\ .7MNL.7MN , 2Nf '.PMU , 7HN* . I »CO, 

t?N>ll , K7,7MCW, 7MC .7K*,7 hh , 7HNOF 

OATA (BFTAI J1,J*l,TIFtMN .2 ho . tMt ,7<«M , 7xM» , 7Nrt»,tHC*/ 

100 fork AT 14(17,11 
102 FOtKAfUt I 2.M 
10) FORN AT 14111 
114 F OtN AT I 74 | 1 1 
725 FORNATI 0* l 0,1 t 
77* Pn*NATC*ri7.4P 
Z2T F0RNATI20I 1 , 4M 0« 5 1 

475 FOtNRTt,/ ,*7H •••NNlCNlll 1175 T TO, I F'tl REFLFC I ItH HALL !****» 
4010 FORNAT ( 44H**» »f I TChO C0K1|NLNI» FA?0 ■AN0r«»*> 

4004 FOAM ATI 20 1 1,1 SI4t 

4000 FOANATI 15N****KQI 11*7 CANNOT If ULFO MfAf****| 

Ttt • 0. 

Cl*0. 

C»*l, 

Ft 1-2. 

FL2-2, 

FlO-O. 

FL0I-F11-1 

IH Hill 1-11 174, IT), IT* 

IT) RAW. - 0. 

to TD IT* 

IT* ARM. - 1. 

I TO CONTINUE 

T4NL - I* - | 


7*11 
24«2 
»» 
7*1* 
74A4 
2414 
7*1 T 

mv 
?*«■» 
24*0 
2491 
24*1 
2*91 
2**4 
7*9) 
2*4* 
2A*T 
?49i 
2499 
2TQO 
7T0I 
2T02 
7T0) 
2T0* 
2 TO) 
2 TO* 
7T0T 
7 TO* 

2 TON 

7710 

7TIL 

2TI2 

2TH 

2TI4 

irt) 

2 Tl* 
2T1T 
JTl* 
2U» 
? r?o 

2T?| 

7T72 

ZT?) 

7 T 7* 

7 T/9 
277* 
2T7T 
2T/R 
712» 
71)0 
2»TI 
IMI 
7T5) 
*»4 
1»»1 
IPM 
IT JT 

»na 

2TI9 

»T*0 

1T4I 

2742 

7**1 

2744 

IT*! 

1 7*4 
IT*T 
2»4* 
2T49 
IT 50 
21*1 
2T5> 
7TH 
774* 
2»»* 
27** 
7T*T 
1M1 
2T49 
1740 
>»*! 
|7« 
IT*) 
27*4 
77** 

<7*2 

2?** 

mi 

in* 

77T| 

2TTJ 

ITT! 

ITT* 

271) 

7 77* 
7777 
7771 
7 7 74 
2710 
2 T# L 
2 712 
271) 
2714 
>71! 

2 71* 
774T 

2 tM 
2 TM 
IT90 
2T91 
IT*? 

im 

|»9* 

219! 

im 

IT9T 

tr«n 
27*9 
74 00 
7*01 
2002 
2*01 
2004 
2*05 
2*0* 
2007 
2*0 A 
IA09 
III! 
2211 
2112 
2AL1 
211* 
2M! 


IKUlll - UtflOl 
*1 * FNVC1NIWC 1/1 12.4*. *7E~51 
7>0 9*0 I -I, NT 
IMNMmill 199, 5*0,560 
599 1AIT( [tfv*0lOI 
1101 

9*0 COMTllAJf 
M CONTtNUC 

iFtNiCNtii.ra.i.an.RROi.LT.21 cn td 6 *o 

H«|f(lN,A2!l 

STOP 

*40 CONI | Nllf 

( 

t calculate electronic partition function) fop atom* and ion! 

c 

on *00 f -i ,N7 
7l-T((lll9*,47E-9 
f»«*0 
NCf 1-0 

C LOOP »«f1N *« TO *9! ($TAAL 1 V*M SPECIF » lOTNTITT 

C TAQNTC STATES P*P SPKIFS 

4 SO |IK-|RR»1 
N1CF«D 
104 IRA, 1 1-0, 

C LOOP FROM *T! TO 47 * FvAujATM 7U7 If J| A« PARTITION FUNCTION 
479 NCF S-NCES* 1 
NICE-NICE*] 

101 IRK, 1 1*1(01 |f R, 1 1 7Cf El MCF St *F*P| - EPS (NCTSl/TlI 
C MJLLOilM IF STATEMENT T»STS TO 5F» IF TOTAL MNin OF UUlinnc 

C ITfll) I FOR UL STATES in STSTENl NAS BEEN IICIIKP 

I F C NC f I *f O.NAFS l *0 TO *00 
45* IF1NICT.EQ.at 00 to 490 
AT* CD TO 4TS 
500 C TIN 7 1 HUE 

iii*9inl«(«iNiHirci 

RETURN 

FNO 

C 

SURD OUT | N( NDOCN 

t ...0R1IANS 5PFCPM WIINIF* TlfcNS 111*5 to* EACH SFATIU. )f A) (ON 

INTEGER FANOA.f I NOR, a l P m a , Rfr a 

C0«N0N/R40/AmH!T»,AmpLiI4| ,t |,C7,C),r»,CS,DELT»,FPSIS*l,FF|i00t. 
UFVIMl ,tHVChS),tMNi;t I ,F WP(7!),F IN 11 1 I | , F ( P 1 1 11 | , FL UFlI.FLS. 
2PLD1,CAMP| MOt , t f FC 54 l,N1 1 1 41, *7 114! »N*f S.NOLF.NOI 1001 .N1C.M1CN1 1 1 
>1 »«IM9C,‘»'V.*K7!!,HV.»AFttl| ». 1fF| 1 11 , xni 1 1 1 1 . RMtX . XQI T. Ill . VDEL 7 
4,TT| 111 .Calm INI.rNSPtSOt.TRSNtlMl ,t» 

COMKNFL INC/HVL I TQO> *R1 , P 7 , ILCN1 II t . 71CPI 1 1 1. IM| 10, I 1 1 ,NXt , IaIni 
1.H1 , E9DL0001 T t<JP|)0(l» 

CONNON/RADCON/FRl >1, 1 II . T PI II », vhnliii ,hhi III .Vi I, 11 ,RI 

1 . iMffA.STI . )«!,«• 1, MS 

COWIN FFOPraN/ Cx I )l ,2 1 . If con ,AT*| I |,«T«1RI 'MATER!, 

1 rath 1 1 ia 

2 4CMU.lt . IF 01.71, »f Ol.n, T, Til 1, 9 l.roi F.st, 

* TUIU.Il,FN1)|>.VNU01.11,Ll,L!.|T»F,R»P,tCH,NCV. 

4 l».NTNOlt, Yin I .7401 I.ISPI.FANOAOI I.FANOaOll, 

* I $«.NIC«,H1 It .N.N.RKRI JOt.ATCMI 
DINENSKM INI 151 

nlNENSlOR ALPHA! ISI.XININrill.flf TA1T1 

DMA (WTi|j),j,i, ri/TtP* .?►*« .2*C ,2HH ,IHPM-,2N04,I«C*F 
91T1 | A4PMAO»,i.i,(!| /;«<)«. 7M0 .2HN»,2 mn ,|NF*, 7M02,2«NI ,2NCn, 
1 ImM|«IK 7,7 mCn,IiC , 2 X* t phn 

c 

C PSTMUSH IOC Rt I 7 v np E*C*1 SPF t IFS 

< 

on 4i j-k,'9 
ini jp-o 

no 71* i -1 ,N1 ca 

|F |PAN0*4|l.Nf.aLPM«(J|| CO TO 2*9 
iNut-r 

00 TO 41 
2)5 CONftNuf 
41 CONTINUE 

t 

C t'A'T DO LOOP M SMTIAt t«10 POINT! 

e 

00 ID 1*1, NT 
ppf IWMSUl 

00 1* J-1,11 
12- INI A I 

IF tIJ.FD.Dt GO TO ia 

XNN1 J.l t*7 I 119aiII«PR7I)*Fl|IJ.I 1 FIT El It 
SO TO 14 
IB INNt J.l 1-0. 

14 CONTINUE 
2* CONTtmr 
C 

C.»...TI|1T|V( ION New PR OniniFS 
no *2! 1*1, NT 
*I-B.*1T1*1«T€II It 
C 

IRD - 10.FI04k,(14ElPt-2.a/Tn*Alptl4*«t 

ANNUA, It • RND4RNNI»,ltFI4.RV*l)*TEf1 M -41. 1*1011 , 1 |«rlPf • 1 .22 /T 
C D- 

RNN||7.||.XWtl2.t|AXNNl5, 1 1/14. 1 1F + I54TFFU I AAl.SaRQL 2,1 14(11*1-1. 
l«4FTlt/l4.*2.4(X*1-D.«S*)/nilt 
r e- 

1 NR 191 1 J ■ VXNU2.[l«XNNrS. I I F4 4 . <n f * I )»1 ( F 1 1 1 49U) «xoi i, n*EXP| -I 
1.2WUI/I4.U 

C 

INN 1 1 *, I t‘«NNtl4.|l4XIM|5,r t/1 *.RIl4l5*TEIMIAA|,9*AOU»1t4ExP|-D 

1, 194/ Till 

xmtt DEWS 1 79 

C PARI t« ION FIMCTIORI RATIO FRO** filLNORF ICOnO FDR 5 000.-1*000. n#01 
I P I XMH 4,1 t.*T,0,| SO TO 5<* 

MQUI 1-0. 

50 »Q 424 
47A C0H7INUC 

pout 142.9 19E4I9PTCC1 It fPl.SU 2, *10.45145. lf-04«TEtt U-l . 4J1(*M* 
ITIEm*->ll«ElFl-L*,!**#tLl«XNN1 T,| I /XNNl 4, 1 1 
525 CDNTTNUF 
*(7ua» 

(NO 

C 

TURNOUT I NT TONrNl 

:ON«eNFR«|>/AHWl 501 ,AHVLU5| ,C I.C2.C) .C4.C1 ,«L T A, (P)| 4* t.EFl *00t, 
lFHTl75>.FMvri*ai,FMPN|J*|,FlOf*T I5t ,P|N | m > ,E ] f II 1 1 1 ,PU. PLF ,PLg! 

IPLftl.CANPMOO>.CertUl t NUl4|,Nlll*|,NAES.NOLP,MDt|«),NlC.NlCNUI 

*1 .NtHVC.NHV.NUI 251 rWY.PRf )t It I. IFEt 1 1) ,NOL 1 1 1 1 . XMDL » RQI MI1.9DELT 
i.Tviin.riipiiu.iAuiioi.rASNLtui 
CON NON/ L INF/htl I ) 0ol ,Rl*R2,TLCNIlll,TLCPttl] , XNNl 18 , 1 11 .MXt . U191 
I.Ml.XMUnoOl .GUPI500I 1 

CON MON/C ON PN/NC4CI20I 
C DN NOD/ iNTCOM/ARt rot , M.N 

DINCNS10N FNUIIII.TWIIU.RECUII, MM( I It ,P 1*1 111 .91 

lAOHlI.PlPOIlll.PIlNMlt.FMPnil 
9 1 PENSION SULt.Slf L1I.S7I 111 

mncnSitw xxHiiB.ui 
FOUtVlL (NCE lliN,i«n 

! OUt VALENCE t (I INI I liPIRM U I . I M I PI 1 1 , F 1 PI 1 1 1 1 
DO ltD LL-I.NIC 

iy-nicnilli 

120 LILLI - 791 IY I 

FL t • f LG • ,00001 
•U 61 - FLS1 f .00001 


2516 
HIT 
111 1 
2914 
712 0 
2521 
2822 
ZN2) 
?B 2 A 
2*7* 
21 2 A 
2B7T 
2821 
2124 
MID 

mi 

29)2 
IASI 
24 14 
Zt» 
25J4 
2>91 
21 1* 
7*59 
1140 
2141 
2X42 
7X4) 
2044 
2945 
7944 
2147 
2948 
2849 
7940 
2151 
2*52 
1X51 
2044 
2554 
144* 
I85T 
254 A 
78)4 
1160 
29*1 
29*7 
79*5 
7944 
7 A AS 
2*4* 
2*67 
Z**A 
71*4 
2971} 
75 71 
2571 
71 T J 
2574 
707) 
287* 
*917 
7R11 
2*79 
20 00 
I0M 
2X07 
2*1) 
7IR4 
2**5 
71*4 
II0T 
71*0 
MU 
7990 
79*1 
2991 
7*9 1 
20*4 
7*9! 
JR4* 
7*9 T 
7191 
7*99 

7900 

7901 
2402 
2*05 
79D4 
7905 
2ND* 
740 r 
MOB 
7409 
2410 

7911 

74U 

74|1 
>914 
Ml! 
791* 
2417 
7911 
MIR 
M 70 
7421 
7927 
297) 
Ml* 
>91* 
292* 
MIT 
2970 
2424 
M10 
Mil 
2417 
7911 
Ml! 
I9)S 
795* 
>9)1 
2954 
7914 
74*0 
1941 
7942 
7*4) 
7*44 
>94* 
294* 
244 T 
29*1 
*949 


F|M(|tl,P|PUll.Fl 
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oa i ti ' t'Mic 
MI «( UlO . 

I FI l » IUl > 9 . 
on 90 K - t , N1«vt 
AEEH - 0 . 
un - o , 
no It [> i , n ( 

Ti-TEf I I I » 6.(i ? F-9 

C«LL NO IFHvC <* l , U . KlM4 t n , TIT | f7 . I ) , XXA T ! , II , IK At 4 , I 1 , xiNI 7 , n , 
tXXNII.I I . UM ' l . ll . nXllC , 11.6141 II , n.MVI IZ , M , KX*1 i),n . 

r . it . xxMiiN . n.goLf I i . ikil , 

IFHiHII P 
6FEIM - 0 . 

6Q - FHVC1KI / T1 
IFI » a - H,l 2.U 
i » ffi r i - o . 

«n tn >x 

> If FHI -* rj * 3 ,* FHVC ( iO ** 17 (* X*f M : l - t .> 
ifihi « i » it , m , i6 
U ACCI 11 - 1 . 14 | b«ntF cu 
« continue 

CM.L Ft *-< s2tA ». rt , nic , me ", Cf , *tt,r * t >, s.s 1 . 42 , t * u,r ih.fip i 
( HHlCM4ll . IIE.il on rr > 7T94 

t JH - » h^iki * 0fF « . I - HWIIII » ritui 

7?49 CONTI Huf 

00 7*9 Lt - I.AIC 
(V - HICNMll 

?** HN'UI • flHKLI * KJW * 1P |- HIJ <| V '| 

10 S n 41 l l • ] .HI C 
*9 TFIR-II I ,*,!! 

11 ' IlNlLM-M l * HH»IF l-r 1 |, F |* nft ( M -IF mr ( t * l -* MVt <*- l ) l / 7 . 
fi iPULi ‘ fiinai«(Hfm i . FrFnrKll *| FHwciKi '> FMvrit - iH / i . 

o n - oiiu.FiMiu i 
F | IOIU)*Mmi i 
41 cnHT|«WE 
40 rn * TiHr>e 
P I TUAN 
EHO 
t 

< IIMnu»IW ITMT ? 

.xth i , ci ,:.*. c *,» L * i « rF $ ri * i . FFMOOi , 

lf >« M29 |, FHVr.l WI , FM ( nH /*|, FHVPl71 |, Fl-ll IM . FlPUni . Pll . Mf . FlD , 

2Fi Cl , £*NP I 4001 ,GFF < \ b > , «1 | 141 .*71 14 ) p. MO 1 100 I . NfC.HI CHIU 

M , HtHrt ,' H » r , yLJt7ii . i ».— ‘•\« n »,’" Hm .« i > iiiii .» Hm f idi Mu . yoHt 
*. T*r iii . c * sfni >* t - svis ( u , in4ifl . i«i , r * 
cohnon/i inf /« vi < idn .- i .> ■. t > r.-i 1 1 > , n i*pi lit . ivt * ii . ji 1 .hi . i * i«p 
t . NI.XNOLOODI , GU6I > 00 > 

cnHH0 «/ r.nNT nf nc xci 201 
' n — on / tsTcc */* H 20 j 

0 l * F ** S ( Hm «hi i «, lit 

OIHENSIftN OFF 111 I .f mv S I .?<10 1 ,1 1 I -MU I . FlftHlll.fi < t ( 111 . H - Tflli.p 
1 1 H 1 1 i.M*n m ,fmui ii i , < < ?nn ) , mu ii i ,T 4 i>n 1 11 , rnui 1 1 1 ,oi«t 1 1 >. 
» 0I *« I IJ .in 73) , SI <700 I . Iioill i . ■| P ')| J | p , mi * I 20 ) .X I *f 111 ,X I - M It 
FOUlUU^F CXxA.XNAI 
OO 170 1 . 1 - 1, NIC 
lY-NlCNHH 
120 1IU.I » « M»i 

hi ci - Fici > . 0)001 

Il'NY 

00 «D ll - I . Hir , 

■ IF tn 1 . o , 

((HILL I • 0 . 

FJFTfiLI » 0 . 

FIHTIUI . 0 . 

Pi (Nil LI ) - 0 . 

mipiilli - a . 

TLCNlll l « 0 . 

>0 ric » im > l . 

■ 7-0 

30 40 X - 1 , I**Y 
* 1 - R2 *1 
x2 -* 7 * nulx > 

NIL - NtJH ) 

• FEN - 0 . 

■ JH - 0 . 

*0 on IQ 1 - 1, HV 

MfllM . 

OM-FMVfKU 7 ) 

iMWAr . H . i im i i . 4 o « o.-fkvip >»* iHcxFiow *- i . > 

1 F IHtCl.Mf .0 I BEHtl - l.tilMOHlII 

10 c hi "U < FHViKi . Ti ,> KM4 , u . tmu . M . MM4 . n . iwio , n . tKHir . n , 

IIXHI §,| I [ I . XHHIO.I I . tXMII , I I.UKI 17.1 J.XIAI M . H . 

7XVN <| 4 ,| l . inlll ,) irimiM l . intliMl . miiMi . Knill . mOi , 
JFHOffll 

C4LI t » inS7IMY . Y «, NK , A | CN , C7 . AfP , F HU , S , 1 1 , 12 . T Mj . F I H , ■ I F I 
1MHlCHlll . Hf.U Gn TO 7744 

XJH - XJW • l |. - AH VI f K I - I -1 —4 I N I I » MM | I 
2799 DO 269 11 • I.HIC 
IY - ftKNUll 

7*4 FIHILL | - 61 « ILL > * XJH « FXFI-fUJIlTll 
C*ll FAFg («, NSW . FHVS.CMD 
HPFt - H4HV / HU1XI 
on 4400 JS • 1 . HI l 
inSKJSl - J4 

■ C • *1 - L ♦ 104UJ41 
' ll ) 6101 tK » l.NPFl 

l « K * < J1 - I * * MFPL 

<m * xjh 

rML4 . Hf.il OtlH *| FHV4fll - FHVlfL-U i/7, 

C XL L MUIEIFHvKUiMI 
on 401 1-liNv 
401 t-liii I . S1IIP * FHUIII 

cm niiiiiixMT . Nic . incx . fi ,* iF l r ) ii ,(. ii ,{|, rwF l iix ,<!« t 

IMHtCHin.Nf ,|| GO TO 2764 

XJHL . XJHL F U . - AWLIKI - TH4 W tlFI » « X IF 1 11 
2769 DO 276 LL - f.HIC 
(V - HrCHILlP 

716 ■ 14(11 I . XI NHL I * XJHL • iKFI-fAUTflfll 

00 M2 tL-UHIC 
TFfLK . fO.U 00 TO 160 

MNFUL »- F [* Tai )» U | NflUH!NniUl I - W * 

F1F7(U P * F | FT | UlMXrMUI * xnwi (,, I 1 .CHJH 

Its X JMOUi l.llxlui 
)02 XIFntLLP • XI Fill ) 

4401 CnHTIHOF 

O ') 900 IL - l.Hfr 

Flint Hi I - FFIHTfU ) 4 IVIUI‘1 • FlNTfill 

FMFiim - miftilli ♦ iimirri ■ fTFmn 

FtMlLlI - o . 

900 FIFKUI - 0 . 

6900 CflNIIHUF 

nn 109 Li ■ 1 i 4 IC 

0 1 FILL I ■ Fltorillt - FIFIIL * • C*IL 
" IX(UI • FUHTILl ) - FI HILL I • CF 1 1 
F I IFTH . 1I > 0 . 

FMHTILLI - 0 . 

PLCPUl 1-TlCFfll l * D | F|LL I 
ID ) UCHHI | - riCHHll •OINIIII 
90 CDN7 (HuF 
4ETUXH 
EHO 


?1M 
2412 
2111 
2914 
24H 
2446 
241 r 
2046 
P*S9 
79*0 
2961 
2167 
2461 
2464 
2461 
79 b A 
»46» 
746 A 
2444 
7970 
Z4TI 
74T2 
7474 
2974 
74 1 1 
74 T6 
247 7 
79T1 
7974 

7910 
74F I 
ZtlJ 

7911 
7944 
79*1 
7*9b 
2917 
790 X 
2949 
74 90 
7«4| 
2-97 
2941 
2444 
2491 
7496 
744 T 
2441 . 
7»94 
MOO 
1001 
4007 
4C10T 
la94 
U« 
1906 

I JOT 
W04 
1009 
DID 
1011 
>912 
Ml) 
TJ14 
KM4 
M 14 
>017 
Mil 
JO 19 
1020 
1021 
V)27 
102) 
W|4 
M74 
6074 
1077 
1071 
1079 
40)0 
*07 1 
»!# 
1914 
1014 
>014 
HH 
>017 
10)6 
Wit 
Wt 
1)41 
1047 
MM 
1064 
U4) 
104* 

194 7 
1046 
10*4 

1090 

1091 
Mil 
JD9) 
«9M 
Mil 
109* 
Ml ? 
DM 
MIT 
1040 
1061 
M62 
104) 
1044 
10*4 
10*4 
1067 
J06I 

1D64 

1070 
10T| 

10 72 

1071 
>074 
>079 
W»4 
JOTT 
1076 
1079 
JO 4 0 
Mil 
1087 
Mil 
9084 
1081 


C . . . . DFTf *H| nf t T«E FHEOUtHCV F01HTS FOP 7«f LINE TA4HSF0FT 

c 

;D«*0H/HAD/AHH[19| ,4MVU Jtt.Cl ,C7,C),C4.C9. OELTX, EFSI 161, ffl 1001, 

I FtivI 29 1 tFHVC (90l,FHY*H29l ,f MVP 1 791 , F t n I < U | ,F |F|||] I . FLI , FL7. FLG , 
2F<0 I .GAHFI 100 I , Ct E lit I ■ H 1 1 141 ,H?I 14) .NAFl, N8LF.H0I IDD) « H 1C. 4 ICHl 1 1 
ll»NlHVt'NHV.Ht|l74],NY,Ftfl| U).7FE(11l'HQlt1| |,XHO|,X«|7,lU.TJ>Ett 
4.7YI 1 1 1.C4S61U I, T«tlH 1901, THIHL 1241 .TH 
COHHON/LtHf/HHlI »00»,Xl,X2, riCHI 111 , Tic P| 1 1 1 .XNNr IX , M 1 . MX I , I X I 9 I 
l, HI .INflUlOOl . G’JF 1 10 0 ) 

COHnaH/IHTCONFXQC 201 . H.4 

DtHEHltOH FMVJl l I , XT ( 20 ) ■ SK < 70) ,04x1201 

o ihfm$ioh * 6.14) 

Mr*(HIII,lM.O/l.M*M,K-J,MF-?,0. 04/ 

rpv-o 

9X-? 

(■•m 

CFIl-O. 

ntt-fiY 

CHECK BOjHCMHKS OF LIHF CXIJUH 
1 FIHVL1XI I'FHVHIXI | 10,10,11 
II l»IHIH(lil-FMIf?UM 17,10,10 
io xiniiXiivii 

)M FPW4AM44H TMtllxr CFHirF OUT rtf CFOIF FXFOMfNCY K*HGf***«l 
C4LI . tVTt 
17 cmiixvi 

I HUX4- t .F -00 / 1C29X7THV 1 1 
XHIPT-O. 1-X-U-/TH7 
OH 90 J-XI.R2 


|XT> | 

JX-HY 

|F|HO|JI , G 7 . ] 4 ) J 6-HI 

(all nuiMmri r ji t i«I 

94K 1 1 1- 1. f-OX /if 
00 900 1*1,47 

rFlVLIII-XHUNI 9D I • 900,400 
Ml 1X| It-KMI4 
900 cnxtriHut 

CAtt runvi JI.TT IF ,n<K. 1 1 
TAUC-OSXINY I »C7 

t ItfCIAL const [>f 1*1 irn fox wvmnnrH mhfs 
IMGAHFIJI) 403.4OL.4OO 
4fll IM7-0 

0||-HVV(J|X*7/14. A9X7.12-XHNI4.H|I«*.111| 

IF1K-UOF I 401.402.401 

407 ca4fi ji-ai m-cn 
GO TO 409 

401 IF«*-l*t6| I 409.464,404 

404 CAHFI J|-AU7)«Glt 

2D rn 400 

409 PFI4-IAH I I 4D7. 406,407 

606 :AHFtj>«ALi»i-«n 

nr m 400 

407 IFMt-IXm I 401,404,400 

*0t r.XHFi j>-xi (*i*Gll 
*00 C'H.mhuF 

;>4.XXM(4, J0I4GA94I J1 *104*1 j ..fAUCI 
cn4B0.94r.AA 
IHMIO.xCtl 
l»1 IHt.EO.OI GAHFI J»«0. 

IH1 1 B0.9 

EAff F6fGU(HCY (YC-t-fHt 14 X7lt7F0 m Twf ADJACtHT FXtOUfMCY 

•» « F*C7*» nF MFAf 7 «F (>*CRfH)H7S 0ECAE4JF 

IH SHE IX 7Hf OIFFC7IOH "F T«F H«*kfu l INF 

IFIJ-Kll 1,20.1 
20 (■•MTIIMI-HIWIXI 
IFISH-CHAKI 61,61.47 
*< 9N-GHAX 
GO TO fl 

l 9--0.44IHVL.I JI*76YL U-lll 
tFISH-0466101.01,64 
6* 9H-GHAK 

01 I F I IHhSOH 4 IK I 60, <0,2 
• 0 FMVUIM*Ll-HVtl JI-9H 
M 

L Y«l *|*T 

tl FHVtnY|.FHVSHV*l«*|<l/m 
3n TO 111 

C CALCUlAir Ft F6C7nt4 MX FKfGUFHCPES LESS IMAM IMF L I HE cehtek 
» )1* T JI-1.19 

41 4KlJl|»m.0*XF( Jlll*«*lX--I.OI/KFtJU 

,,,,H W**' 1 Jl I *r 1.07 IF | Jt I 1 44 INK- IP * ll.o* KF( Jill 44 

|F(5KI JI1-CM7S--20.P 42,47,40 
*0 (FIJI- 1144.46,41 
66 IF1 Jll - AFI Jll / l , 

6ft Tn 4| 

41 XFI Jll-lFl j|-i IAIXFMI1-RM Jl-| ||/4. 

:n to 4 i 

*2 XI"1H 

(FIAilttKl Jll4Cm/lH-|.OI-.(H>(»U 6,6.49 
69 X F I J 1 r I I ■ X F 1 J | If OjK i J i I 4 1 <X/(Ol-|l(( JI1 I 
» C nxT (Hut 
4 Ut|Tfm,40Q| 

900 Fft6MT <| MjtOX ' IOHt6tO » STnF // 4K , 4M « ftnf , HI , IMHt | HOF « . 19 * , ( MX . 1 1 
1Xb 9HDHV,9K,1 )HH | H* I HC AFKfHT ,1K. 2 N Ik , 6 X , ItXDJ X I 
00 9 J 2-1.20 
FIA.J1.-M' jji »GOH 

<MPtlR,IDOl IM Jl P .EH ,x , XL.GCIX .Ml 42) , n M I J I ) 

100 *n*«XAH 21 n.6,1 tX.ll'bK, 4*12.41 
4 COAT Max 
Miiru.Nop 

200 FOKMaIIatm FffflUEHCV CAPft PfFtATlOH DID HOT CONV«ttF| 

C6LI mr 
6 7X* XT l J 1) 

XF f 1 1-4. 1 

CA4CV4.XTF CDK tVS FOND I PTC FAfOllfHCT MINI* 

On 110 l-l.NK 
L Y-LtfAY 

FWVSCLYl-HHtl JI-OOK6H(|,*FJ|»46||«K»I-LI-|. I/F*| 

190 CONTINUE 
ill CONTINUE 

IFij~«n 7,21,7 
21 94 -ehhfIKI-HYLI J l 
IFHF-CMIP 12.12.94 

90 1P-GHAK 
CO TD |» 

.7 l4-.94lwn.l J*I)-HVLIJII 

IFISP-M6KI 12,12,41 

91 SF-GHAX 

17 IHSP-GOKilCK) 92,97,6 
41 HIK-IV*! 

XPX>2t«H 
HIKF-N(R»1 
IKL-N1K4I6V 
FPTY51 161 l»HVL f Jl 
00 19 L-Nf 66,966 

LT-l*INV j,;- 

II FhvI ( ITI-PNV 9I L V-l P *96/ XX » , 

«o »n in 


1096 

1067 

»0«6 

>069 

7090 

7041 

10*2 

JOT) 

1 1094 

M91 
1046 
>097 
7096 
>099 
>100 
>101 
>107 
1I0J 
>104 
>101 
>10* 
MSI 
1101 
1104 
>110 
Mil 

>117 

1U> 

111 * 

>119 

>116 

MIT 

m» 

in* 

1170 

1121 

>122 

mi 

>124 
>129 
>126 
1127 
1126 
>121 
li VI 
Mil 
>112 
MM 
U7 * 
JIM 
111* 
mr 
in* 

>1)9 

1I4D 

>141 

11*2 

> 14 ) 

>1*4 

> 1*9 

>146 

>1*7 

>149 

>1*9 

>110 

Mil 

1112 

)19> 

3114 

>144 
IIM 
mi 
>194 
>160 
>161 
> 1*1 
MAI 
>164 
7161 
116* 
1167 
> 16 * 
> 1*4 
>170 
Mil 
M»Z 
MT > 
UP* 
1179 
117 * 
1177 
11»4 
II »* 
>169 
Ml) 
>1*2 
MM 
>164 
>119 
>166 
M«> 
MAI 
1114 
>140 
MU 
11*1 
tm 

MX* 

M4» 

M*6 

>14) 

>198 

>194 

1200 

>201 

1707 

)20> 

) 70 * 

1704 

>206 

1707 

1206 

> 20 * 

>210 

>m 

3712 
1211 
>714 
3211 
>2)6 
121 » 


1UHKCJUT1NE FXEO (K.PUHV.FHVl.CFHI 
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C C AL CUl J1 1 - fx F»[r[HS MfOuPwfrfj fQUAl fa OF M*AT£6 THAN THE 
C UNF CFNTF* 

» 'll) * Jl* 1, l* 

61 SKlJl>'tfl.O+lFlj|||*Hl«1-l.O>/AF<.m 

W#KFUll*Hi#*«T*J4 II M t NF-It-ll.O+XFI J 1 1 1 • •■ 

INI *1.0) 

IMSt 1 JU*CG*n»- 20 .,l M,fc 2 ,A 0 

60 I t I Jl-| I 66,64,61 
6 * XF|Jlt*KH J|>/ 3 . 

GO Tn 61 

*1 *H II >» Kf I Jl - I >♦<*• | J | ► -»> | >|- 1 I 1 / 6 . 

Gfl rn 6 i 

6 2 <1 .IP 

It MR SUM JlMCOA/SP- !.■)>-. 0001 1 to. 10,66 
6 f *ei JiTl I-IFC Jll « 05 MJ I I M 

IF )AtS< 6*1 J1 I •tQBi'lP - l , 0 1 - . OflfllOt | 10,10,9 
<* CONTlNllF 

xi -s* 

CD TO i 

10 F|.xF|Jl> 
ft*. HUM 
NFK-2*Nft 41 

t C6LCUL4T CP4*F 6*QH0F NT, r-l ‘O'JFHCY POINTS 

ID 260 J.tNK,Nrt 
ll*l«Jtr 

FMvSIlTPrUYl U». CD* *1 I !!.♦** »*• f-i. | /f jo 

2 60 CONTINUF 
*6! CONtlNuF 
I6*NFMI«T 

:fii • rnt ♦ m-tvsu m-fn/si f»Yim*x«m i j> 

60 -nufiMuf 

c caiCihau TDI41 “ojHflfu nr («fduf>jct poihtj n < r* itmctOuF 

N5HV*MUll'l*l2*Nl,|| 

tr T'jON 

END 


lumnutlNf H y MV, 641 ,iV.4-1. 
UH.ANO, imm.hm, AN2P, K">>1 
CnNrniN/O'Nr */*« , * r Y t 1 

0MM . SIO * it r < 1 1 , 14 PNU 1 1 , 1 1 

m»*iH6tns Nil 
*«.OCTIOI>«LOC1DIO» 
604.7.244-16 
l-l 

1*1 

Til 7 »Xtf tl l/*.A7F*l>6 

XI IMI.JV/HV 

DH-a . 


• r. acn,ac,acp. 

.*»PN*>) 


«r»*o, 

*HN-0. 

KNN-0. 

1N2F»0. 

r*. 0 , 

*inH4-o. 

'1HH4.0. 

< IN- 1 .497F«»64I 1 - — F *P I -H* / . 441 1 I /I t II »4 1 *1 y |R| h*/. 4}lt-l . I I 
If KH-|4.)/NK1||| 

XO*19.4/iUT44.l 
M»J6.4/lMll I 

)*N-«.n,lt>.o*FXM-2.lF/*« FfVl lH,0H 1*1-1. ST/XMlU I 
<*O-.4.0*4t0*MpT -1 ,M/*» Ml II»117| -4 .16/1* l | L M 
( ^*-4. -1.4. 0*« ipi 244/4. t| it | •rx*( -/. l (i M« 4.0* r(»|-6.ia/ 

* 'lt74.*,BMI,0*«»l-l.ll/w1«l 11 

OHP4 * Ml II 

CtM. /HVlHV./n, (>!,/(, 2[ » 

Xk-Mv/«niii 

Fpoi.o-rxp<-in 

r NITftOCEH HfCH L IH C 4F«tT 1 

IFPtCBCIIM ISO. 2561, 460 
600 AFT*. I 1,4/Ml Ml ) 

Mf|, 4060, *HV4»llFtP)-)*| 
rriHy-O.iil 2440,2640.1641 

16*0 Efll. 7 .M(-M>MiH»l-l«.lt/nl|tl 1 ilii.»llf|M|{Un 4 . 1 -l I l/l«tl' 
10.06161 ti (>***•,.*« rt> 

<1NFS>H1/<Mtl>I.WI 
16*1 CONTINUE 

f IXXCfN Hir.H 1 1 HE 11* 1 f 6 

1 1 fNCNC I 211 601,7441,601 
60| I F t HV-0 . 46 I 11*1, 2441.1644 

■•4*2 FQ4-2. 7 AF-0<». *Jl*f X*1 -«F Til**. *| /'IFfA-TI/ I*. I - I , > jf E r A-p. p.7 )| / I 00 
1N*4,.5fTI| 

nOMi. E0*M6FEI*1,fT| 

7641 CONTTNUF 

f COMTPinuriQJt FRO* 4I«E'«UN MO HR. 

IF I NC9C4 1) ) 402,1016,602 
602 TMW-7.J1I 1071, 10T4,10I* 

407* 1MMV-4.44) 1071.10TI, 1071 
1074 IFIHV-1. Ill 1001 , 1064 .1001 

1044 CIN2«>.UH2PM.F-HMIO.PM-| 1,474,**. I 7*n</- 0,91 *hv* • 2 I 
GO TO 1076 

1006 nN2P.UN2F4l,F-m4|0.«*l-4*.OH6*« , 616741-014111 1-1.2 447Tt-06«7 It | 
l*»*»HV*na.*14-0. 1021 *F -0761 It MO, J 16447-04*1 1 L|6*2 1»l4rv6«2M4 - 4,4 
26644*0, 4 J901F- 01* T(l 1-0 . I9644F- 07* 1 1 ||**2I I 
1076 CflH J | HUE 

t. ItGnlVl ION CONTA I RUT f 066 

!FMCtC<*>> 6Ol.lQ6.401 
601 )f)MV-l.77> 106,100,100 
100 MW*KNN.AHNM.*|-|A 
106 CONTINUF 

C.....C- CCMT«llUT|ON FN0N SENAN AND HA AN ICO" 5 
TFINCRCMOII 6600,6600,4601 

6601 UCHV-1.241 6609,6602,6402 

6ADZ *C« * «C« ♦ l.4«-lT4*C»A|/r*,||E.|64Tll 1*4 l.f *OCH*< cP) - I.26/NK1II.1 
*600 CONTINUE 

(ONrAlturiON f«ON CH4Nn*A4F«**4ft AMI 6MF4T 
iFtNctenn 404,2 m 2,*4>4 
606 fF1Hy.ll. 41 2100, 1409,2607 

2600 IP1HV-0.T6I 2602,1401,1401 

2601 IF4MV-l.ll 66 M. 6600,0601 

6400 IH» - HHH41.;-|T|«(-4. 11*7. I4*w*l 

an to 1M7 

6401 tMHV~«,l 6601,6902,6601 

6602 XHR - 1 AHN • |, f . |7 1 6| 6.T66- 1 .7 *h**0. ] 

00 to 1607 

6601 XKH - I A76l*|. c- J 71 *1 ] ,6-D. 4 16*MV*’0- 0724 *hVP*2. I 
2501 CONTINUE 

C,» , ,«D» CQNTAttUTlOM F*OH CUU*C H IlL. 4 INS 7 PONG AMO HUFU.I* 

1FINCRC161I 609,2*10,604 
609 IFIMV-U.t 2901,2901,2910 
2603 IFIHV-1. 91 2910,7606,2604 
2404 IF4MV-J.91 2909,2506,1604 
260* XON-40R66.7E.IO 
00 TQ 2910 

7504 [F<H*-».T| 2907,2607,2506 
2507 XnN«A 0 N*l.F-|ft*(| 4 . 1 4-o, MU »hv 1 
GO TO 2910 

' 2504 ADN*A0"*I.E-18»I19.1A-0.*61*MV| 

2610 CONTINUE 

NO Ut?*4V10ttT CONTNIBUTIFIN FtON 676H44H 4MO MIA T9 All AN YAM 
IMfCICIJII 606,7979,606 
606 IMW-ll.l) 26|],29U.25Z5 


1221 

122* 

9221 

1224 

1221 

12 J 6 

1277 

1279 

9229 

1719 

1211 

1212 

im 

1214 

9219 

1216 

32ir 

3/66 

1216 

1740 

124 1 

1242 
1141 
1244 
1249 
1246 
1242 
1244 
1246 
1260 
1261 
1292 
1291 
¥294 
1299 
1244 
1261 
129A 
1794 
1260 
1261 
1262 
1261 
1264 
1769 
1266 
92*7 
*769 
W 64 
VI# 
*271 
*/»2 

7 1 
9274 
17 *4 
*7 74 


*7* J 
IUI 
12 «7 
MM 
>764 
17»* 

1296 

9291 

mi 

>744 

9749 

* 2*1 

12 ** 

1241 

17*4 

W«6 
1744 
P>1 
>/*■ 
9744 
1109 
1101 
ISO* 
1101 
1904 
1136 
1104 
nor 
not 
] 194 
11 LO 

im 

1112 

Mil 

1114 
111 9 
9114 
sin 
lilt 
1314 
1320 
1121 
im 
1 >21 
1124 
1121 
9124 
9121 
3126 
3129 
9310 

mi 

1311 

1911 

1116 

9399 

1)14 

W> 

ma 

1319 

1140 
3141 
114* 
1143 
■ 344 

1141 
1146 
3347 
9146 
334* 
3160 
M9I 
11*2 

3393 

3394 
1155 
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2911 IF |HY-6,0) 7520, 2520, }• 1 ) 

|9|» IFIMV-6, 66)2914, 2519,29)1 

2914 ONft.lAHOf i.f-|f|4|0.0*«l-6.24l»,HV»n.6f*4T» 

GO TO 2926 

*919 1 F | HV -10.) 2611.2911,2516 
Z6IT INCH AMI* | „ 9F- 1 1 
GO ro 2626 

7916 0NOM ANOM. 2-1*1 •16*. 74-1 1. I26«hv< l ,033*wy**2l 
CO TO 2676 

r *<0 VlSlNtl CCHrN|«/Tir*» Ft"tN tltrtHAH *va NHATSM A6VN 

7620 IFIHV-2.TI 2129 , 2923, 2371 

?9*| OHO" C 4X04 l.E- LA I • | 0. ••4-3.4420* 0. 1 1 M«f -J?*T|l 1+0 . 1 9444E-06»T [ L > •* 
12+Hy+l -2, 3164*0. 104622-024) U I -0. [ 009*1 -Ot*T|L I4*7 > ♦ I hv**2)4»o , 5Ts 
*»4-«.lT*4**-0l4m|.Q.lltT6f-OT*Tll>*+?|1 
2929 CANT r bul 

r f ) TAI164N ATONIC CONT4 I OUT TON 
IFlNCtCItlltO). 16, 60t 

607 ON«M A4AN4JCA1 It) 64, 647X4) IX-XNI 4|N/M M+) 

IF4NV-4.72I 11,200. 200 
TOO 0n«QN* 7XM 4.12/ktTf L l-llt 
IMKV-I0.4I 19, *01. 201 

ZOI 3N-DN+AN.4. 14E-I T4FIF (lO.t/ffTl, |-kn>/ONN 
HIHV-I2.D4 15,702.202 

202 DN-{m»*N46.4f -1741X61 11,0/HI Ut-XMI/ONN 
IMHV-L4.3) 19,203,209 
70) D«*0N+AR4| .162-1 7/0H- 
C OlVCFN ATOMIC CONlFTtUTiaN 
1* 07*0. 

IF1NC4C14II 604,409.404 

40* PI-1Q44A04JM7 H)6< *.0/9.D»4CX6(X«-BO|«t-'^hv+ + 1 
1 1 1 hi/- 6, 2*1 16,204,204 
204 07*02*tXFI 4,22/XATlL 1-KXA 

07*D|4|0.16|9+0.42*94|T1( 1/4000. i, 

X 1- HV— 4 , 72 

IM 4*2 ^ •9^’‘1 , *204)9.7T | /'* >4fI6f-4,/*/XK)ai ll+M. -o . 0*) /*«■ 906*4* 

IFiwv- 11.41 14.236.206 
206 »I*B».,o,l,>e-IVOP 
40* CONMNUF 

t..„. CDNAFC1I0N6 Ml 61 0FIIMN5 

16 90) ML I -9000. I 1000,6*76,6* /9 
4*7* |P)NV-1.4L 4477,6*77,9000 
4*17 tFIHV-.IMI 6000 , 4470.6*7* 

4*7« 01*024)0 , | 419+0 .42464 1)14 F/400O. II 

aN- 0 NM 0 .« 6 »Q,| 6 t*)T)l 1 7 6*90. I > 

6000 cr/NUHUF 

I F INC AC I 10| I 411,17,611 

*11 nt-4.0»t044Ar«|„)1«lMlll+' <F4««-T| | /H,„ I 
CMHy-LO,|> 1 1 , 206 ,70 A 
*06 Of.OHf API ll.l/MXLI-XRI 
c OAVCto MittCLAAt rriNTtitojr I M, 

IT 002-0-0 

IFINCACOI II 61 1,11,411 
413 IMHV-l.l |t, 1306, |)09 
1109 iMrtVM.i 1101,20). 70) 

201 IMKT-1,/1 206, 2 Ot«1 1 
tot no/* *n?+60Q.a*S3M i tamdo. n* r*-/ tint ■ i 
lit TIL 1 1 1 M (HV-t .64 > /O .109 >4*7 I / 2.6i 2F * 

«J TH It 

C , . , , , 9 HUNAN- tllNCt 6AN*11 U/l* fl|6F«M4N 4 NO «N4«3M9N 
1 101 HO*. tA02*l,E-tt<4 Ld.*»l -7 1, 4) *» 0.4060*1 - a2*T ( i I -u ./*4*6 f-W,* r< L >4. 

I t4*tV« 14.7102-0. I J96*(-0*4I 1 1 )+3 , 641 *) r - 0 7+T| L |4,j , HV4-2 1*1 -P. 4U 

766«0, 1 1 4*04-1)4, rft | - 0.4)ll4r-o*.’ll f**/l| 
t NITKOCtN NOtFCUltl CDNIR I A||T | Oh 

14 PNJ.Q.Q 

)F 1NCACI12 1 1 4|4. /PIP, 6|« 

614 IMNV.0,41 I190,20«,|M 
204 DIHV-Il.r )»119. 710,2010 
210 IF lHV-10.6) II 1,7 1 1,217 

6)t«F DOFF (Ft 1 HAT A *41)6 *p«M f 'OH \ I F| N + F+C »l)6 MV 4.A6CM 

c than io, 9 fv - and **n* hi (a *r. »t. /h* imam to,9 cv 

fl l ON*. I 4N2/*. 9*f 4 1*1 4f X6l 2. 10*A*r -|4. tn -0, )«664f -0 I'T U 1+0. >4* I IF -O 
I' »lAt I*4J4MV4( -0,4*2 29* l»N- I - 0. 4 I 7 b J* -0T4r)L) + 4*) 

}» | MV*lJ|«IC.|Hlrt*'l, *»>iir.^M||||ff,,miF -04*TI L I .*?M I 

GO )0 *010 

*1* OA7.(AN*/J.6*f-1 + »4F«FO, 1D244I-14. 3<J4‘0. • 1 »!, IF -0 ?♦ Tft I -0.44197F-0 
|44f)t )• A2,MV* 1 4, ) 03|* 0. 16*1 *F - 534T ( 1 > »0. 624* / e -OT*T 1 1 NV«*2 1 

7«)-a. 14701 F -01,0. L 47**|-t44 111 l-Q,12T»|f-0i-T in 

GO TO 2010 

N* m FFEQIIFNCT 3AN04 )l» AMO /. I FIM* Rttr«-«6M i'lP *V. 

2660 1 F | HV— 4. 41 7641,7691,2010 
>661 LMHV-0.T6I 201 0, 794 2 , J44 / 

*99* 9N7.* < E-2Q44H24|0.4n-l.»/.T*+MV-o.4l4* HV «A2-2.6«A/l9mM»2.F-|- 
l*»N2410,44|- IT, 14. A. PlAMV- 1 . I V*, ?-)»2A79 b Tit | I 
C CO CONI 4 1 NuT |T)N 

Fin CMfCtfD IGA I NAT - 1 ‘T.A«f>5 0AT4 JAN-49 

iPio ocn-o.o 

1 4 I NCtC I 1311 419,116,419 
414 tF)MV-4.*»| 111.220.220 
*20 KIHT-IO.ll *71,221.119 
III IF<MV-t.T9J 2500,2000.7001 

2000 Xlfi.f .4*71 *09*11 .-txn -rfy/XAT 11 1 ) | / t Hi «.,4% , , I r X+l H»/NNl)t j , - ■ > ■ 
41MMT.04.1.1T4F-034TH l - . 061 F-OMTIL )*4*+)l AN* I -46. 94 • 1 1 . 76F-09* 

|Tltl-0.74TF-0MMl»447» ’ 

ICf). A C OnP * * 1 7 . >J 74*6460/9 1C 
GO TO II* 

2001 OCO+ACO*)!*!-.’. *5*5*4)I7T.1-141<..,T|.»-*44*0.M V *>*•/’ I Mil* 

C NTDtOCtN 4U»fr.JtA4 CQNTI1 *uT|0N 

C«,...N* 1 THAN AND C ONT 9 | m|T | H*,« ttr* 9FT9HFV 

U> Oh/- 0 , a 

|F)NCACll4‘I»l«.tl >,6lh 
414 )F|MV-».6M U«, 272, 227 
III IFIKV-74.P /7),271,| 1« 

2*3 IMMV‘"I6.Vjp 10*3,174.1/4 
10*3 DIHT-IO.I 2530,1911 . 79 )< 

2931 0i*2« I ART* I .) -If M 1 0. »*1 - 1 /a. 1 ).o.| IM9F Ol«)ltl-Q.t*0T6F-INv4TUt*A 
17.MV41 I r. 3/6-0. J44*4t -02**1 L>+».t7p*T( -o*+ru )6*2t+rMV**2>+( -D.423 
72 T»0.t6 I 64 F -04411 1 > -0.4I402I-OA*) n l»*?l| 
iFltltl-ltOP.I 114,91 26, *T 75 


I »| i«| - 1 *NH | J. 144/1?. a* 


4124 3«**IAH7*i lf -i9Mio.4A<U.>,n'*i).i*M<) F -oj6Tai_ fl . u , i , e -0M T(cl *., 
1-HV4I - 1.74 14-0. 111«6F-0|*Ml>»0. nnF-BTMII >**7 I MHV4*7l»1 0,3744 
Lli-4l<P.N4*)2F-O4>ritl-0.|7T74F-O9*T|, !»•/,, ,om 7 ' 

GD TO ||4 

*910 I • (NV-4.21 2612,76)1, <416 
*91) In 7- AM 24 2. 9I-1A 
GO 70 114 

»ll K)Ht/-»,1l 2914. 2934. 2934 

2911 MMlN7*|,f-|ll«10,3M(-10T. T**0. 44704) -01 4T1l)-0.-6O4tF-OA4T t, L . 

14 *»HV 4 ( 66 ,*tr- 0 .l T 4 AtE-t|*r 11 )> 0 .) 44 T)f - 05 *Tll. > 44/1 ,( MV* 47 )* 1 - 4 . 1 T 
141 * 0 . U9)7f-0f»T| I l-o. n«t2C-04+Tlt l*»7l> 

00 to 119 

IIM Q*i 1*4 ANfAI. f. If 1*10. 0991 -6. 2*20-0, 2TI17F -02*1 1LI+Q. /OT] 62-04 *Ut 14 

lM+«V»<-6. I401*a. 2444M -0*«m 1-0. 16011 UtO.f* 

*164-0. 94qTlE^]»«T[L 140. *lt*OF-074F|t l»«}| I 

00 70 1 19 

124 0H2*AM24|0.9»*t-|7.|N+g.M2 4iMy-i«.OH 

C C 41 AON MX OCUt At CORtNINuriON 

Ilf oct-o.a 

UlNCACimi 617,1*0,417 
411 74 C HV— 1 ,A 1 120,22 4, 2<4 
Z24 IF tMV-6 . p» *29.224,1*0 
C 7 M FMAA I 

229 K 1 * 1 UII • 10 . 0 ** 1 - 74. 41 *|, 96 *hv 

|.0.9*6*MV*«*1 1 


3156 
1)4 r 
11»A 
11*9 
134 P 
3361 
1362 
9341 
116* 
1146 
1166 
3)67 
MPfl 
»4N 

mo 

DM 

1)72 

11 TJ 

»T4 

))T6 

» r« 

)1T) 

I) 76 

im 

3150 

311] 

))«2 

II ) 1 
1)64 
3166 
1364 
HOT 

1)511 

lit* 

1140 
33*1 
1392 

1141 
11*9 
1196 
3196 
1 J*T 
319* 
1)99 
16 00 
1401 

»4*,’ 

340 ) 

1404 

1405 
1*04 
3*01 
1405 
)4P* 
3415 
34; . 
1412 
1 * 1 ) 
1*16 
>414 
1414 
141 T 
5414 
1414 
1470 
1*21 
34*7 
>42) 
342* 
3426 
1476 

142 r 

342t 

1424 

1430 

6*31 

1412 

143) 

143* 


3436 
1*36 
14 1 T 
14 1 • 
1434 
3440 
1441 
1*42 
1443 

34*4 
3446 
344ft 
>447 
3445 
144 9 

1460 
*461 
1467 
3461 
3454 
1465 

)46ft 
34 5 T 
1441 
349* 
>4*0 

1461 
3442 
146 J 
6444 
14*6 

3444 

1467 
>441 
34*4 
3*70 
6*71 
14 7* 
1471 
1471 
1479 


14 71 
>410 
1491. 

in a; 

Ml) 

149* 

1*25 

I4tr 

34*7 

3499 

3494 

6*90 


IF IMV-6,15) 129,124,124 
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c 

us or.j,ec?«tr. r*lo.o**l -21 . >4*4. ?4S*hv- o.4*04*hv**2i 
i'(Hv-i-t iMo.in.i.'fi 
t SKIM 

li**2,mv*i4o.864-d.47?h«-<!/»tili-o. j5ji9e-o**tii»««ziHw»*^ !•!-». 
7 <jbu»<j.«i446kf-o3*t il i -o. Tibt?f-07»t »li**?i i 

00 »o l/o 

C KJlUMH 

l/* -)C/-DC2*AC7*ia.**l -14.7*2. *<S.39-MV> » 

C :n c-OHreifitifiM 
120 9CN*0.0 

1 * I »c I I* 1 I * I I 71.418 
bit 1*1 MV-O.bl Li 1.72b .2? 6 
22b lflHV-4.1 1227,1727. 121 

1227 0CN»IACM*1.<-l4l*10.»*|-l,T«U.0.l4<»62R-0J*m9-®.IOt?0e-QT*TrLI** 
12»NY*<4.4A7l-0. 101**7-02*71 1 | .D.bOTf IR-07* Ml 1**7 \ * ( MV **? I *1 -2 . *04 
7T*a.41*12f-0J*Tltf-0.7*414S-()7*TU l**2l I 
lftMH-7.1 121.1228,122* 

atM-QCH«AtN*10.**1-4l .**♦ I ». 1**MV-I . 646--V--71 
:*»k<in atom conn i«u7 ion 

00 -0. 

IMMdtCHfM 6»9,l?7,4|N 
IF <HV-3.7BI 127,118.17" 

IK>^1<K*| .1 9*I«TfLI*tlfl I HV-||,;il 

in to 122 

')C-l«**bC*1.1JM<T|L>*?8*l*T.'"/W7Un*|f /W*3 

127,2711,278 

Dt-0t*AC*2.2f-lT*f ARI-2. HZ iituii /OC" 

122,228,771 

oe-oc *ac *i . m-lt»ikri-i. ?<./ *«mn /oc* 

IFLmv-LI. 161 122.210.710 
OC-OC*Af**.*€-l7/KN 
CAR KOH COHTIINMIR 
OCR-0. 

iMROtlllll 420.111,470 
i* ihv-is.mi m.iu.nn 

■K*-1.344»it-ZQ*AC*»t(L|RF»RMMV-2*.4|/i»Fiin*M/HV**l 

>n tn Hi 

or 4 - * . M4lu-20*UMIILIM /m*»t 

l* l«V-L<J.0tl 111,711,211 

-KR.0CR-*. K-lTiFl7tH.lt* b* 7f1 ) I*AC«/CCAm 
I r I NV--24.4 * lit. 211, 217 
XMK7»l.ur,LMK7/DCN 
r oht r wjf 

||78U([,LI .|FC*1 0N»dc *01 UN*»tr«4nt »i8rx*10M*O**2+OCl*Dtb 

l ♦ 00 2 »CM2*Om« St l* I * m M* KflN* 0 vm s ♦ o 1 m 1 1 
C ufQBntRN HIM CO*itK I OUT 1 0*8 

JffNCACUMI 021.422.671 

471 

211 !*N *1. 16#-20**H*f r 1 1 1* WP II -«V-| >„* I /(MTU l I /*¥•*> 
or« *n 14*0 

1406 4H- 6.24*-30*8N*Ttl I 

l*E»*l-L2.A/)UtTH 11/ MV 4*1 
IMx«‘l.l9l 1410 . 2 14 .214 

214 OK • OMM.471-IVAMMXRI-I2.O/UT4LH/I0MMA4M***!* 

[F< **-3.401 1410.2 11.2 II 

218 >h . CW*4.8Tlf-t4»4w*f IR<- 1 0.2/** 111 I I/L0 hnMh***)» 
t*lMV-| 1.181 1410,714. 714 
71* >H-'M*1.'»Bt-l4*lM/IDHMA**V**S] 

1*40 URNUt 1 ,L 1 -KJRmOI l,ll«IFC*0H 
422 COMF1 NUE 
■ CtliMI 
FNl> 
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C 
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*1" 
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71" 
774 
230 
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470 

I7« 

1 10 

711 

212 

111 


C 


WM"I/T|W MUtttRml.il) 

:iUuk4HL UK lltMmiM COEFFICIENTS 

r 0M«n«*/ *AO/4KVt*0» , 8HVL 1741 <C 1 »C 2,£ 6«C4»C4«0#Lfii ER14 Ml, 081 1001 • 

ifmvi 74i *FNV£i4o»,rMW't2si,Fi<viH2ii,r mill mint iii.Fti.Hi.nc. 

7FlGI.GA*»l 1M I , CEFIS4 I.NLI I4).IZ( 16 1 ,h« FS.MtLA.NOllOOl ,V|t.«1C«l 1 1 
t),MtH V c.MMy.tNJ174I.MV.R8«t(UI,7fM Ml. MDM1U.8MA.8Q1 *,111,80111 
4, )tl 1 11 , CASH 14 1 , FNlNf *01 , FMSMl I/M ,r» 
r ANMON/i INF / mVL 1 1001 . 81 « 87 • TlCMi 111, It HR 111 1 . IMNI 10*111. Hit, IAt<M 
1,8 I.XMOLC 1001 .fiURIIOOl 
ItMEMUOM Mill .888 7 1 

-MM'NUOM 8LRMI 11.0(741 "I, Of I 181,81 I 4|,HAI4I,U0I0|,1 mA8II,1mM|0I 
1 .UIIDMIIIIIMHAIIIMHIIMI 

iiriuiPHlH,j.| l g|/0..i,Mi7.M,4,l-4,1.t‘«,|.tf.|,|.y,l,M(. 
1 1/ 

)A III 81 Ml J I , J*L, »l /O., 4. E-4. 1 .E-3.2.F- 1. 1 . f-3.9, 7- S« ».€-!, I .(- If 
DATA! DEL IJliJ-l."l/0,,.B7.,O4 1 .OI,r|2,. lb, .7, .24/ 

UTM 8| Ul ,7«| ,41/0. ,.074. . 0* i . I , ■ 14. .7, .71, . 1/ 

NUIU *f U.j, 1.41/1. 747. I. I lb. 7. 74 A ,2. 101 ,7.000, L. 7 71 ,1.440, 1,146 
1/ 

>47 81M.8<J1,/-l,81/|."86,7. 1 8 7,7. /*•,/. 0*9,1. 714, 1 . 27 »,0.40l,g.bbl 


1/ 

1*7/1 lH*<ii . - l,8l/|. 211,-bOb. .417, .*7" . - . 744. -»*27»-.TM,-.6|1/ 
B*18ltH«UKJ>l,t1/.4l2,.T, .424, . It*,-. 04,-. 1)7, -.*37, -.721/ 
087*148841 Jl. 7-l.ll/-l. 14 4f *01, -1.4027*01. - l.lltf *0 >. -1 ,40*1*04. 

1- 4. Iblf *07. -4.0l*M02i-4.b IV *07,-t.»|»l *07/ 

[>• 7 48 JIHMJ I, 4-1, 8 1/8.4197*0/, 1.0147*02, -0.7*4 1 »0l, -3.304E *02, 

1-7 . *70f *07 ,-l .4*ar *02 I . 1 7OF*07, - I . 1777 *07/ 
0l7lliH*4t2l,J*1»|l/-.244 r -7,- . 14°f *7, - . |2bF*7,-, 044E *J 71ER*1 ,- 
I. 602t> 1, -.4441*1,-. 4401*1/ 

MTIISHHIJI,M,IIM4«i7,.l4K*<N,‘.474(»l,*.t«lt*U-.illMi-. 
146IE* I. - . 313f * L 11ZE - l / 

0818 I XM | J | I (.l,T1/n.2f|M-7b, 7b. 4 404E-I4. 11, 41707-/4,1. *71) U-2* 
1.21,71187-74, 70. 4404f-**,|b. *1708-24/ 
in 40 1*1, N» 

11111*0, 

rurrri i i*8.42r-4 

7Z-TFflM*L.l»04Tf-l4 
7J . VCfITI /19000. 

<8 ■ 9. 

1TUI tnrv MM I MOI VI DM44 U8fl 
*0 210 J-81,47 

ESIAktltK INDEXING ON 1*FC I 74 
IK-NOfJI 

|R| (8-01 101,101,1 

101 118-4 
188-1 

*1 - 0.21 

...,7ne tnom rot NEunui mu inert 
■sn 70 io 

I IRIIR-Hl 107,102,1 

102 ILK-2 
188-2 


E* - 0,44 

....nit HIDE* F 08 NEUTRAL OlTGEN 
CO TO 19 

> 17(18-241 103,103,4 
101 ILK-12 
188*1 


IK - .43 

....(HI INDEX <08 NKfTOtt CM BOM 
GfJ TO 10 

1 Iff |o-171 104,104,4 

104 ILK-14 
148*4 

110 • 1000. 41HVLIJI*. 00011 
GD TO 10 

< . ,#THt MOfi RO* MfuTObt MYOtOfiEM 

4 Iff 18-401 106,101,4 

105 ILK— 1 
188-4 


34*1 

*4*7 

64*1 

64*4 

»4*6 

6**4 
14* T 
64*6 
649* 

1900 

1901 
6402 
1901 
1904 
>909 
6906 
6407 
6906 
690* 
3110 
1911 
6912 
6911 
6914 
19)4 
1916 
6911 
641* 
661* 
69f« 
1421 
>922 
6*21 
1424 
6426 
3426 
397 7 
4676 
362* 
6660 
3611 
>612 
1436 
3614 
9614 
1434 
>467 
341* 
166* 

1440 
>64| 
7647 

1441 
1144 
1944 

1446 
6647 
1640 
164* 
I960 
1491 

1447 
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DESCRIPTION OF INPUT 


CARD SET I - CONTROL CARO AND CASE IDENTIFICATION 
CARO I, FORMAT ( 5 1 1 . 15A 5 ► 

FIELD Ip l COLUMNS 1-51 KQ S 

COLUMN l OETEPNINFS IF CHANCES ARE TO BE HADE FOR PARAMETERS IN 
NAMELIST NAME?. SEE CARO Sfl 4. 

0 NO CHANGES IK KAH£2 

1 CHANCES IN N6NE2 

COLUMN t DETERMINES IF MASS BALANCE OPTION TO BE USED. SEE ALSO THE 
PARAMETERS L SC AND CCS IN NAME2 nf CARO SET 4. 

0 MASS BALANCE NOT USED 

1 MASS BALANCE USEO 

COLUMN 3 DETERMINES IF RADIATIVE TRANSPORT 15 CONSIDERED. 

0 NO RADIATIVE TRANSPORT 

1 RADIATIVE TRANSPORT 

COLUMN 4 DETERMINES IF MOLECULES ARE TO BE INCLUOEO IN RAOI AT tVE 

0 MOLECULES INCLUOEO I SEC CARO SET 71 

1 MOLECULES NOT INCLUOEO 

COLUMN 5 DETERMINES HOW TH| L iME CONTRIBUTIONS ME CALCULATED IN THE 
• AOIATIVE TRANSPORT* 

0 IMCLUOE LINES, WEAK UNES TREATEO APPROXIMATELY 

1 INCLUDE LINES IN FULL DETAIL 

2 EXCLUDE LINES 
FIELD 2 , I COLUMNS 6-BOI CASE 

CASE IDENTIFICATION < ALPHAMUNf R ICt • 

CARO SET 2 - FREESTREAM CONDITIONS, NUMBER OF NODES* NOSE RADIUS* 

CAROS AS REQUIRED, NAMELIST FROM AT (NAMED 


VF FREESTREAM VELOCITY* METERS PER SECOND 

RMOF FREESTREAM DENSITY, KILOGRAMS PER CUBIC METER 

PF FREESTREAM PRESSURE. NEMf CMS PER SQUARE METER 

HF FREESTREAM ENTHALPY t JOULES PER KILOGRAM 

RM ROOT RADIUS AT STAGNATION POINT I HOSE RADIUS I, METERS 

RTS THROUGH LATER INCLUDING MALL AMO SHOCK LOCATIONS, 

Dr Up 

rm !??fV?.* l0,OI '* NS,0N * t LOCATION of NODES THROUGH LAYER U-l.KYS). 

Ylll-0 AT MALL AND Y|KYS»-1 AT SHOCK. 

KSE NUMBER OF NOOES ARQWO BODY. MAXIMUM Of 15. 

“ SP ^tIF|CATlON QF BODY SHAPE AT NOOES AROUND BOOT. 

* S BE<W|REC **> EQUAL TO KSE* FDRMAT I SF15. 7 1 . >3NE CARD FOR EACH BflOV 
RAOI AN BE6,h * T LENGTHS TO BE NDNDI MENSI ONAL BY AN AND ANGLES IN 

COLUMN 1-1J THETA, BODY ANGLE 

COLUMN 16-30 S. OI STANCE ALONG BOOT FRCM STAGNATION POINT 
5S-JWJJ 51-45 «B, RADIUS OF BODY PERPEnOICUL AR TO AXIS. 

COLUMN 46-60 X9, AXIAL DISTANCE FROM STAGNATION POINT 

COLUMN 61-75 *, BODY CURVATURE TERM 

CARD SET 4 - CONVERGENCE TERMS, OUTPUT, MASS BALANCE TCRMS, ETC. 

SKIP THIS SET IF KOSUI-O. 

CAROS AS RE QlJ I R £ 0 , NAMELIST FORMAT (NAME2 I 

IN Hk '* 2 ** f SET tH PROGRAM * BUT ARE NUT 

ySr^oi?! » V . F ! R . iU ’ MOSLEMS . TO CHANCE ANY OF THEM, 

SET KQSUI-l AND READ IN THE VALUES FOR THE PARAMETERS WHICH ARE TO ftp 
CHANGED, for no changes, SET KQS(1)*0 ANO SKIP Th[S CARD S*T, 

?« multiply of correlation por initial shock stand-off distance. 

TIFRAC MULTIPLY OF VALUE FOR GETTING TIME sf E o. 

IKSC THE ITERATION TO BEGIN CHECKING FC* CONVERGENCE. 

CC1 CONVERGENCE CRITERION. THE CHANGE IN ENTHALPY BETWEEN 

<HINMI-HIN||/H«N), MUST BE LESS THAN CCl FOR 

vlWV c nOE Nt t » 

ccf fraction of wooes point s along wall, shock, and layer midpoint 

FOR WHICH the CONVERGENCE CRITERION MUST K MET. VALUE fST 
CCF MUST BE LESS THAN 1.0. 

ICC *' '»"«“«• F °* m,M THE E *»* CRITE.tO, 

**** OF ITERATIONS TO BE ALLOWED. CAROS ARE PUNCHED 

fni|Ti4 IJ.ilSJ C,SE W RUN. SEE CARO SET 5. 

IOUTM PRINTEO OUTPUT IS GIVEN POR CONVERGED SOLUTION. 

BETW€6N € 0UTPUT Tf <WTPUT * I0U ™ lS THE HiJ **t* OP ITERATIONS 


lOUTf IF ThE INITIAL VALUES (FIRST GUESS VALUES) ARE TO BE PRINTEO, 

SET THE VALUE OF 1JUTF TO 10UTN MINUS ONE. |F HOI, SET 10UTF 
EQUAL Tfl ZERO, 

ITC number of iterations between calculation of thermodynamic 

PROPERTIES. 

IRC NUMBER UF tTfA4TlDNS BETWEEN CALCULATION OF RADIATIVE 

IPANSPOPT. 

tKSUdl ARRAY FOP VALUES OF ITERATIONS AT WHICH THE VALUES FOR ITC 
AND IRC CAN BE CHANGED DURING SOLUTION. MAXIMUM OF 5. 

ITCUU) ARRAY OF VALUES FOR ITC WHICH CORRESPONDS TO'lKSUlf). 

IRCUin array of VALUES FOR IRC WHICH CORRESPONDS TO IKSUIU. 

NCTS IF NCTS EQUALS ZERO, THE TIME STEP CAN VARY AROUND BODY AMD 

SOLUTION WILL GENERALLY CONVERGE FASTER. IF NCTS IS NOT EQUAL 
YU IF MO, THE MINIMUM TIME STEP IS USEO AT ALL BODY LOCATIONS. 
CDS CRITERION fO,«f NET BEFORE MASS BALANCE OPTION CAN BE USED. 

The shock velocity at the stagnation point (OELTATI 111 must be 

LESS THAN THE SET VALUE FDR CGS BEFORE THE MASS BALANCE 
OPTION CAN B £ USEO FOR CALCULATING THE SHOCK STAND-OFF 

DISTANCE around bqqy. this is because the shock stano-ofp 
DISTANCE AT the STAGMT ION POINT MUST be CONVERGED BEFORE USING 
THf "ASS BALANCE OPTION. 

L5C K 0 « l « ***P*nON AT WHICH THE MASS BALANCE OPTION CAM BE 

CARD SFT 5 - INPUT FOP THE PICK UP OF A SOLUTION. 

ITERATION** IS * BlT ™ S ° ™ AT * SOLUTION CAN BE PICKED UP FROM A SPECIFIED 

FDA A N*W CASE, A BLANK CARO IS INSERTED FOR THIS CARO SET. 

IF TME NUMB?* OF ITERATIONS REACHES THE VALUE SET FDR IKSF ICAflD SET 41 
THEN A CONVERGED SOLUTION WAS NOT OBTAINED WITHIN the SPECIFIED NUMBEkV 
ITERATIONS AND A SET OF CAROS ARE PUNCHED OUT. THIS SET OF PUNCHEO OUTPUT 
£J2 ‘ N * EBT€0 CARO SET 5 AND THE SOLUTION Can BE PICKED UP BY ANOTHER 
!c N c^2,t?, T . ITER 4Tt0N * F0R * p ICK UP CASE, tKSF AND IKSC (CARD SET 4) MUST 
BE GREATER THAN THE VALUE OF USP FROM THE PRIOR RIM) 

CARD SET 6, T ANO B, 

these card sets ape the chemistry inputs pop the chemical equilibrium 

CALCULATIONS ANC The BASIC RAOtATIOM AMD SPECTROSCOPIC DATA FOR Tltf 

t4 *-CULATlONS. The INPUTS FOP THE CARD SETS Aft£ DESCRIBED 
IN THE REPORT - NICOiET, W.f. USEA*S MANUAL FOR THE GENERALIZED RADIATION 

transfer code ipad/equili. aerothern report number uS-m-v. acrotherm 

CDRPORAT t DM, MOUNTAIN V|£W r CAL IFORNl A. 

s5*?oS"« i»o'" C "" ™ E SUB,0Ur "‘ E , » I|,UT - C.W 55 IS j *NP 9 ME RE»0 IN 
CARO StT 6 - CHEMISTRY !N<>uf, 

i: e ,irs^?%ri?cS^;?. sET 1,6 ots “ ,i * ED ,n m ° up » «•» «*»» - □<= de« b 

MODIFICATIONS 

CROUP 3 IK COLUMNS 25-50 ON EACH ELEMENT C ARO, EXCEPT ELECTRON, GIVE THE 

ile " e - t - us * newi,ve —«• 

GFOUP 4 THE THERMUOYNAmC INPUT DAT* 13 CARO SET ) FDA THE ATOMIC SPECIES 
OF THE ELEMENTS MUST BE ARRANGED FIRST IN THE SAME ORDER AS 

Gft0UP T * E OATA F 0 R TH f ELECTRON AND (ONIEEO SPECIES 
ABE STILL AT THE END. CONOENSED SPECIES ARE NOT ALLOWED. 

MAXIMUM NUMBER OF SPECIES IS 4D. A BLANK CARO MUST BE PLACED 
AT THE ENO OF G«Ot)P 4 AS STATED BY NICOIET. 

CARD SET T - CONTINUUM CONTRIBUTIONS TO RADIATIVE TRANSPORT. SKIP THIS CARO 
SE ■ KOSl 3 1 *0* 

;, HE T«^5j^? R B riU M 5?. SET * RE o£sw,eEo IN “ 0J ° •• C «° * « f ° E « B 
wi E cu".M^“SJ c ^ c DUMv^ u ^i«;,'ir i0 " j * ,E To “ ,h ihe 

CARO SET 8 - RADIATION AND SPEOpoSCOP IC OATA. SKIP THIS CARD SET IF KQSt3)«a 

B^NkSle 7! S C "° SET Aa£ 0ES « 1BE0 0E « » CWfIM ScS ?N m°' 



r> v 


INPUT FOR SAMPLE CASE 



lltoi 

.97 f 02 

- .0) N2 

(BY VOlUKEt, 60 DEG. CONICAL 

0QDT, 

HIGH YEl, 

1 

10 1 99 



JANAF 6- 

10-65 




76 

INANE 1 

VF-lllTS 

, RHDP« 

.002«5, PF-117.3, MF--086OOOO., 

RN-.3048 

, K5E-10. 

2 

242999+5 134019+5 497.150 + 1-566)? 7-6 

190*09+5 692449+2 530 

3000 L 

-on- 


77 


KVS-9, 

7(11 »0* t . 

123*. 2 50.. 375,. 400,. 625,. 730 

,.875, 

1.000. 

*END 

3 

?4?999+) 1)4819+5 496546+1 402556-6 

)59)05*5 492849+2 3000 

60001 

-on- 


78 

1. 470 796 

0. 


0. 0. 

1 

.0 


4 

2 0 1 99 



JANAF 1J 

-11-66 


n?- 


79 

1 *170796 

.2 


.198669 .019933 

t 

.0 


4 

-113899*5 235049+5 577474*1 1*7404-1- 

2*966?, 4 693049+2 500 

30001 

- 002 - 


00 

U 170796 

■ 4 


.304418 .0709)9 

1 

.0 


6 

-113899*4 2)5849*5 065124*1 136(81-1 

6)1 ?4J* 6 6 93049+ ? 30)0 

60001 

-002- 


01 

1.(167140 

.6 


.366164 ,172175 

0 



7 

1 6 -I 99 



f.FlNV A [ 4 

1PH-I22 12/61 

f ♦ 


«Z 

1.067190 

.0 


.7)9)71 .272175 

0 



4 

♦ 4299A5+6*t40120+1 + 4fl4657+1+LB0700-4*340000+9+4fl4?3?*2?l)00. 

IDOOO. 1 

c+ 


83 

1.067190 

L. 2 


1.0B57AI .472175 

0 



9 

+4?89fl>, 6+1 501 20+ 5+40965 7 + 

+1 80 roa-44 )40000+5 *404212 +22000. 

L 3000.1 

c* 


44 

1.067190 

2.0 


1 . 7T0601 .072176 

0 



10 

16 16 

- 1 99 


CONVAIB 

ZtH-122 12/61 

CD* 


85 

1.047198 

3.0 


2.64*626 1.372175 

0 



11 

*294203+6+ 24)8)0*5+89)61 4+ L +170000-4- 

160900+ 7+ 6*6595+22 000. 

l 0000. 1 

cn* 


"6 

1. 047190 

4.0 


3.510652 I.0T21T5 

0 



1? 

429418 3*6* 243810* 5+ 49 361 ■»+ V + 1 TRQCVO-4- 

V 5090 0+ 1 + 6665 95 * 2 ? OOO „ 

10000.1 

CD* 


87 

1.047190 

5.0 


4.376677 2.372175 

0 



13 

l 7 -1 99 



CONTAIN 

2PW-1?? 17/ 61 

N+ 


«B 

»NME7 

LS0600. t*St>l200, JTC-lOO, 1 RCUM 1 '200.200,200.206,100, 


14 

• 4466* L* 6+ 131310* 5*5017 51*1*617100-4- 

14*1 00+T+49684T+22000 . 

l 0000.1 

N + 


09 


tOUTN'200, jnutP- 

»99 MVT> 




15 

*446641*6* |51 310*5*401751+1*61 71 00-4- 

184100*7*496047*22000. 

10000. 1 

Nt 


90 

0 







16 

(710 

-1 99 


JANAF 6- 

30-6* 


NO* 


91 

4 







17 

2)6659*6 221499*3 792263+1 320193-3- 

313163*6 641)20+2 500 

30001 

-ONO* 


92 

6 CMprm 12. OIL 

2676 




I* 

216659*6 221499*5 092163*1 38986)-*- 

1*4535*7 65)320+2 3000 

60001 

-ONO* 


9) 

7NJTR0OEH 14.007 

0193 




19 

2 7 -| 99 



CONVAIA 

2 PH- 122 12/61 

N2* 


94 

9 ONVAEN 16.000 

71)1 




20 

♦ 357258*6+2514 70*5+ 1)6500*2-327940-)- 

2256)0+0+656601+22000. 

10000. 1 

NZ* 


95 

9 9 €L EC IRON .00049 





n 

* 157230*6+231 4 70* 5* 1 36)08* 2-32 7940- )- 

223630+ 8* 656601+22000. 

lOOQO.l 

N2+ 


96 

1006 



JAN At 03/61 



C 

u 

l 0 -l 99 



CONVAIA 

ZPH-122 12/61 

n* 


97 

17086666 

134500*5 

446413*1 

220125-5 4090)0*6 492070*2 

400. 

3000,1 

o.c 

IS 

*)7 (999*6* 149290+4* 13627 1*1 *3067 10- 3* 390200*7*484844*22000. 

100 00. 1 

0* 


40 

170806*6 

1)5500*5 

412212*1 

26(400-) 262006*7 492070*2 

3000. 

5000.1 

o.c 

24 

+3 2t099*6* L49290 *4* 3)827 1 ♦ 1 *3067 10- 3*4902 00+ 7*484849+ 72000. 

10000. L 

n* 


99 

1007 



JANAF 03/61 



N 

2ft 

2 8 -l 99 



tanvAi* 

10H-L22 12/61 

r>2+ 


100 

11296546 

134370*5 406944*1 

30)516-4 958460*5 480900*2 

300, 

lOOO, 1 

O.N 

26 

+2 79693 +6*2467 10*4* 594709* I *62*34 0-3* 10)500*0*67 771 i +22000. 

10000.1 

02* 


101 

1 12965*6 

154370*5 420957*1 

240044—5*4 172 73+6 480900+2 

3000. 

4000. 1 

O.N 

2? 

+779693+6+2467)0*4+ 444 704+1+826140-)+ 

10)500+0+6777)1+72000. 

10000.1 

02+ 


102 

1004 



J4N4F 06/62 



0 

20 

16 17 

-1 99 


JANAt 

6/69 «1 

CN* 


10) 

595590*5 

1)4220*5 

497220*1 

3*0760-5 154749*9 S009&0+2 

300. 

3000-1 

o.o 

29 

429194+6 2)0054*1 411795+1 

517016-3-130643+6 702719+7 inn 

30001 

-OCN* 


104 

595490*5 

135220*4 

647409*1 

-224268-3-09] 702*7 500960+2 

3000. 

3000.1 

0.0 

10 

429)99+6 7)6059+4 10?4 1 0*2-492)) 9-5- 

499732+7 702739*2 1000 

60001 

-OCN* 


105 

2 7 



JANAF 9-30-69 



N? 

31 

1 4 1 7 

1 99 


JANAF 

b/69 AS 

CN- 


106 

0*0 

221649*5 

793097*1 

319649-3-31*299+6 6)7600*2 

300 

ioooi 

-ON? 

32 

15999+ *5 222 6?9+5 761649+ L 420233-3- 

100744*6 6489)0*2 300 

3000 L 

1 OCN- 


107 

0*0 

221649*5 

078236*1 

6* 410-4-119262*7 6)7690*2 

3000 

60001 

-ONZ 

33 

144999+5 222629*4 042)72+1 )7 3 764-4-1 5/072*7 6489)0*2 3000 

60001 

10CN- 


100 

2 0 



JAN At 9-30-65 



0? 

34 









109 

0*0 

234449*5 

008690*1 

497028-3-742932*6 679729*2 

500 

JOOOI 

-00? 

S3 

1111 

>1111 

1 1 l 

l 0 1 1 

110 1 




no 

0*0 

234449*4 

100974*2 

636677-4-659192*7 6797/9*2 

3000 

60001 

-002 

36 

2056 4 








111 

1 6 1 

7 


JANAF 12—31-66 


CN 

ST 

0.40 *0t 

0.10 *02 

0.60 +01 

0.10 +02 

0.56 +02 

0.90 

♦ 02 


112 

110999*6 

2324 79*4 

706116*1 

944544-)- 107243*6 669?»0*2 

300 

30001 

-OCN 

3t 

0.00 *00 

0.00 *00 

0.90 +01 

0.40 *01 

O.LO +01 

0.50 

+ot 


113 

110999*6 

232479*4 

126220*2 

-1 76667-3-1046*0*0 6697*0*2 

3000 

60001 

-OCN 

39 

0*30 +D I 

l.S:7 +11 

0.90 +01 

0.40 +02 

0.90 +01 

0.90 

• 01 


114 

l 6 l 

8 


JANAt 9-90-65 



CO 

40 

o.n +oi 

(/.40 +01 

0.12 +02 

0.13 »02 

0.36 +0? 

0.00 

+ 00 


114 

-264169*9 

223969*5 

009732*1 

2*1927-3-132124*6 65)699*2 

400 

30001 

-ocr> 

41 

0,20 *0 1 

0.00 +J1 

0.18 +02 

0.32 +02 

O.aO +on 

0.00 

• oo 


116 

-264169*4 

223564*5 

4059Z3*| 

902009-4-124941*7 64)699*2 

1000 

40001 

-oco 

42 

0.00 *00 

0.00 +oo 

0.40 +01 

0.00 +00 

0.00 *00 

0.00 

+ 00 

Q 

117 

1 6 2 

0 


JANAt 9-30-44 



C02 

43 

0.04 *00 

0.00 +00 

0.00 +00 

9.00 +00 

0.40 *01 

0.00 

+00 


118 

<940419*9 

364349*5 

1)5296*7 

479023-3-065470+6 798400*2 

400 

30001 

-0C02 

44 

0.03 +00 

0.00 +00 

0.00 »oo 

Q.OO +00 

0.00 +00 

0, DO 

+00 


119 

-440549*5 

365349*5 

144004*2 

(76347- 3-130622*7 790*00*2 

3000 

60001 

-0CO2 

44 

0.60 +01 

0.00 +00 

0.00 +00 

9.00 +00 

0.00 +00 

0.00 

+00 


120 

2 6 



JANAf 12/69 

« 


Cl 

46 

0.03 +00 

0.00 +00 

0.00 *00 

9.00 +00 

0.00 +00 

0.00 

+ 00 


121 

200271*6 

746779*5 

7764 30+ 1 

6? LI 94-) 20BDI4+6 604)90*2 

100 

30001 

IOC? 

47 

0.00 *00 

a. 2984*01 

0.1576*01 

0.1043*02 

0.1100+02 

0.1300*02 


122 

200271*6 

246779*4 

04)360*1 

*47514-1 2596)6*6 603590*2 

3070 

60001 

IOC 2 

*8 

0.00 +00 

0.00 +00 

0.96 -0/ 

0. 1967*01 

0.4189+01 

0.9144*01 


123 

2 6 1 

7 


JANAF 3-J1-67 



C2N 

49 

0.4519+01 

0.1074*02 

0.1099*02 

0.1200+02 

0.00 *00 

1 .26)9*00 


124 

151009*6 

104599*5 

146543*2 

722952-4-442127*6 066270*2 

400 

30001 

-0C2H 

50 

2.60)9+00 

4 .1025+00 

7.5331+00 

7.9461*00 

8.64*2*00 

0.00 

+00 

0 

123 

13)000*6 

304599*5 

143940*2 

490920-4 396995*6 066270*2 

3000 

60001 

-0C2N 

51 

0.00 +00 

0. 1020+02 

0.1208*0? 

0.1Z74+02 

0.00 +00 

0.00 

+00 


126 

2 6 1 

8 


JAttAf 9-30-46 



tw 

42 









127 

684999*5 

304079*5 

142061*2 

468192-3-700511*6 064460*2 

500 

30001 

-oczc 

33 









128 

684999*4 

386079*5 

162297*2 

-141246-3-293 785*7 664460+2 

3000 

60001 

-0C2O 

54 









1 29 

3 6 



JANAt IZ/69 

AS 


C) 

54 









130 

199999*6 

309579*5 

946626*1 

976470-3-160294+6 812)54*2 

300 

30001 

IOC) 

5b 









131 

| 95999 *6 

109579*5 

129504+7 

166804-3-516560+7 812359*2 

3000 

60001 

IOC) 

37 

0.60 +O0 

0.01 +30 

0.96 *00 

0.12 *01 

0.14 +01 

0. 162 

*01 


132 

♦ 4 



JANAt 12/64 

AS 


C4 

58 

0.24 *01 

0.14 +01 

0.40 +01 

0.62 +01 

0.00 +QI 

0.90 

+01 


IS) 

2)1494*6 

410969*4 

183531+7 

744725-1-677814*6 9409)9*2 

100 

IOOOI 

10C4 

59 

0.97 +01 

0.1044+02 

0. 1080+0? 

0. II7Q+02 

0. 1210+02 

0. 1280+07 


134 

231949*6 

410969*5 

206450*2 

244726-5-306340*7 9409)4*2 

3000 

60001 

IOC 4 

60 

0.1340*02 

0.1)00*02 

fl.00 +oo 

0.00 *00 

0.00 +00 

0.00 

+Q0 


135 

4 6 



JANAf 12/64 

AS 


cs 

61 

0.00 +00 

0.94 +00 

0. t? +01 

0.14 +01 

0.16 +01 

0.24 

+ 01 


136 

2J3999*6 

653359*5 

234751+ t 

992624-3-4)6491** 109120+3 

300 

ioooi 

10C5 

60 

0,3300+01 

0.40 +01 

0.60 +01 

o.ao +01 

0.90 +01 

0.4T 

+oi 


1)7 

248999*6 

653)59*4 

267961*2 

3021)0-4-412043*7 109128*3 

1000 

60001 

10C4 

63 

0.1045+02 

O.IOOO+O? 

O.U 70+02 

0.1210*02 

0.1200+02 

0.1340*02 


1)0 

LOOT 01 

08 


JANAt 06/43 



NO 

64 

0.1)80*02 

0. |4«0+02 

0.00 *00 

0.00 *90 

0.00 +oo 

0.00 

+ao 


139 

215800*5 

227000*5 

877423*1 

849031-4-789696*6 488490*2 

400. 

3000.1 

6. HQ 

63 

0.69 *00 

0.89 +30 

0.1040+0) 

0. 1290+01 

0.1460+01 

0.1850+01 


140 

215000*4 

227000*4 

916260+1 

6970*4-4-212519*7 600490*2 3000. 

4000.1 

a, NO 

66 

0.2090+01 

0+3700*01 

0.6000+ai 

0.7110+01 

0,8400+01 

0.94 

♦ 01 


141 

1 7 2 

fl 


JANAt 9-30-64 



NO? 

67 

0.1007+02 

0. 1062+02 

0.1120+0? 

0. 1 190+02 

0.1241*07 

0.1)04*02 


142 

790999*4 

34*819*5 

131300*2 

l 1 5744- 3—0O4Q04+6 847950*2 

500 

30001 

-ONT? 

66 

0.1)50*02 

0.14/0+0? 

. • 

. + 





143 

790999*4 

344419*5 

139044+2 

720659-6-169730*7 847950*2 

3000 

60001 

-0NO2 

69 

6 71)16 








144 

2 7 I 

8 


JANAF 10-31*64 


N20 

TO 

6 6 8 6 3 4 

5 1 I 0101212 

712 A 9 4 

4 4 





145 

19*099*5 

364479*6 

1)7618*2 

30242 0-3- 024997*6 015409*2 

500 

lOpOL 

-0N20 

Ti 

?7 C 

.66(1 0.8421 

5 f *7F -20 






(96099*4 

364529*5 

140040*2 

2 32407-4-220472*7 815909*2 

3000 

60001 

-0N20 

72 

16 

0.603 0. 

196 

110E-2I 6 





147 

1 99 



JANAF 3-31*64 



F- 

73 

2? 

0.6659 0. 

044 

321E-21 3 





148 

o*0 

134229*5 

494000*1 

000000-0-700991-3 164409*2 

400 

10001 

- Of - 

74 

6 

0.689 0. 

1597 

10TF-2O 6 

# 




149 

0*0 

1 34229*5 

490 799*J 

000000-0 216303-0 164584*2 

3000 

60001 

-Of- 

75 

23 

a. 710 0, 

?08 

6391-10 4 





140 


£ 



5 

0.7)25 

0.0149 

446C-21 

151 

11 

10.10? 

0.1510 

633F-22 



226 

22 

0.044 

o.OBQn 

4127-21 ). 

152 

25 

10.196 

0.416? 




227 

21 

0.852 

0.0667 

1086-21 

153 

1 

10.1)? 

0.1 P40 

421F-Z? 



228 

5 

0.B75 

0.0366 

1007-21 4. 
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